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Lfe PRODUCT CODE: NAINDEC-U-DFFPB-A-D 

LS PRODUCT NAME: PDP-11/3M FPP DIAGNOSTIC PAR T 2 

2C DATE: DECEMBER 1S76 

2| AUTHOR: ANTHONY VEZ2A 

tow 

K 

27 THE INFORMATION IN THIS DOCUMENT IS SUBJECT TO CHANGE 

26 WITHOUT NOTICE AND SHOULD NOT BE CONSTUEO AS A COMMITMENT BY 
2« DIGITAL EQUIPMENT CORPORATION. DIGITAL EQUIPMENT 
3C CORPORATION ASSUMES NO RESPONSIBILITY FOR ANY ERRORS THAT 
2: MAY OCCUR IN THIS MANUAL. 

33 THE SOFTWARE DESCRIBED IN THIS DOCUMENT IS FURNISHED TO THE 
2* PURCHASER UNDER A LICENSE FOR USE ON A SINGLE COMPUTER 
35 SYSTEM AND CAN BE COPIED (WITH INCLUSION OF OIGITAL'S 

34 COPYRIGHT NOTICE) ONLY FOR USE IN SUCH SYSTEM, EXCEPT AS MAY 

27 OTHERWISE BE PROVIDED IN WRITING BY DIGITAL. 

2« DIGITAL EQUIPMENT CORPORATION ASSUMES NO RESPONSIBILITY FOR 

< THE USE OR RELIABILITY OF ITS SOFTWARE ON EQUIPMENT THAT IS 

NOT SUPPLIED BY DIGITAL. 

-£ 

i2 COPYRIGHT (C) 1976 BY DIGITAL EQUIPMENT CORPORATION 
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112 

| IS THE THREE PROGRAfIS: 

117 DfFPA DFFPB OFFPC 

111 ARE DESIGN TO DETECT AND REPORT LOGIC FAULTS IN THE 

12C PDP 11/34 FP11-A FLOATING POINT PROCESSOR. THE 

121 DESIGN IS AN ATTEMPT TO REACH ALL RON STATES. TAKE 

122 ALL BRANCH HICRO TESTS (BUT'S) AND VARIFY ALL THE 

123 LOGIC. THEY CONSIST OF 155 (OC'i) INDIVIDUAL TESTS 

124 SEQUENCED TO DETECT AND ATTEMPT TO IDENTIFY FAULTS 

125 WITH A MINIMUM HARDWARE OR SOFTWARE LEVEL. THE 

126 TESTS ARE PARTIONED INTO THREE STAND-ALONE PROGRAMS 

127 DESCRIBED BELOW . 

ill NOTE THAT ERROR REPORTS IN THESE PROGRAMS ARE BASED 

130 UPON THE KNOWLEDGE THAT ALL PREVIOUS TESTS HAVE BEEN 

131 RUN AND IN MOST CASE THAT THERE IS ONLY A SINGLE 

132 POINT FAULT IN THE FP11-A. IF THE PROGRAMS OR TESTS 

133 ARE NOT RUN IN ORDER THEN ERROR MESSAGES MAY NOT BE 

134 ACCURATE. 
135 

136 

137 A. DFFPA 
138 

129 DFFPA TESTS: 
140 

141 LDFPS 

142 STFPS 
142 CFCC 

144 SETF, SETD, SETI AND SETL 

145 STST 

1% LDF AND LOO (ALL SOURCE MOOES) 

147 STO (MODE 0 AND 1) 

I4B ADOF, AOOD AND SUBD (MOST CONDITIONS) 

14«3 

ISC B. DFFPB 

1S1 

152 OFFPB TESTS: 
153 

154 ADDF, ADDO AND SUBD (ALL CONDITIONS NOT 

155 TESTED IN DFFPA) 

156 CMPO AND CMPF 

157 DIVO AND DIVF 
ISA MULD AND MULF 
159 MOOD AND MODF 
160 

161 C. DFFPC 
162 

163 DFFPC TESTS: 
164 

165 STF AND STD (ALL MOOES) 

166 STCFD AND STCOF 

167 CLRD AND CLRF 
166 NECF AND NECD 
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171 NEGP, ABSF AND TSTF (ALL SOURCE >1jDE5; 

172 NEGF. ABSF AND TSTF (ALL SOURCE MODES- 

173 LDFPS (ALL SOURCE MODES) 

174 LDCIF AND LOClF 

175 LDCID AND LDCLD 

176 LDEXP 

177 STFPS (ALL DESTINATION MODES) 

178 STCFL AND STCFI 
ITS STCDL AND STCDI 
1BC STEXP 

191 STST 

1S2 

183 

IW 2. REQUIREMENTS 

IBS 

166 

187 £.1 EQUIPMENT 

186 

189 A POP 11/34 (WITH OR WITHOUT CONSOLE). LA30 (OR 

190 EQUIVALENT) AND AN FPU -A FLOATING POINT PROCESSOR. 

191 NOTE THAT A SPECIAL INTERRUPTS TEST NODULE IS BEING 

192 DESIGNED FOR USE IN THE MANUFACTURING ENVIRONMENT. 

193 WHEN THIS OEVICE IS PRESENT THE PROGRAM DFFPB WILL 

194 MAKE USE OF IT TO TEST THE FPP INTERRUPT ON BUS 

195 REQUEST FUNCTIONS. 
1% 

197 2.2 STORAGE 

196 

199 ALL THREE PROGRAM REQUIRE A MEMORY SYSTEM OF AT 

200 LEAST 16K TO LOAD AND RUN. 

201 

202 2.3 PRELIMINARY PROGRAMS 

20? 

204 THESE THREE DIAGNOSTICS WILL ASSUME THAT THE POP 

205 11/34 CENTRAL PROCESSOR IS FAULTLESS. THEREFORE WHEN 

206 IN DOUBT RUN THE POP H/34 PROCESSOR DIAGNOSTICS 

207 BEFORE THESE FPU -A DIAGNOSTICS. 
208 

209 

210 3. LOADING PROCEDURE 

211 

212 

213 THE PROGRAMS WILL BE SUPPLIED ON THE 11--34 

214 DIAGNOSTIC MEDIA. REFER TO THE XXOP OPERATING 

215 MANUAL FOR FURTHER INFORMATION. 

217 4. STARTING PROCEDURE 



218 
219 

220 4.1 CONTROL SWITCH SETTINGS 

221 

222 SEE SECTION 5.1 

cc2 

11* 4.2 PROGRAM AND OPERATOR ACTION 
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22S 
226 
227 
228 
229 
23C 
231 
232 
233 
234 

=35 
=38 
23" 
=39 
239 
24C 
241 
=42 
243 
244 
245 
2% 
247 

2«8 
249 
25C 
251 
252 
253 
254 
255 
2% 
2S7 
258 
259 
260 
281 
282 
283 
284 
285 
288 
267 
288 
289 
270 
271 
272 
273 
274 
275 
278 
277 

278 
279 
28C 



5. 
5.1 



6. 
6.1 



1. 
2. 
3. 

4. 



LOAD PROGRAM INTO NEF10PY 
LOAD ADDRESS 200 

SET CONSOLE SWITCHES (IF CONSOLE IS PRESENT > 
PRESS START 

CN FIRST PASS THE PROGRAM 
WILL IDENTIFY ITSELF. NOTE THAT IF THERE IS 
NO PHYSICAL CONSOLE THE PROGRAM WILL REQUEST 
THE OPERATOR FOR INITIAL VALUE FOR ^€ 
SOFTWARE SWITCH REGISTER (SEE SECTION 8.5). 
IF RUNNING UNDER ACT, APT OR CHAIN THIS DOES 
NOT APPLY. 

THE PROGRAM WILL LOOP AND AN END OF PASS AND 
ERROR SUMMARY HILL BE TYPED AT THE END OF 
EVERY PASS. 

OPERATING PROCEDURE 



OPERATIONAL SWITCH SETTINGS 
THE SWITCH SETTING ARE: 



SW<15>sl.. 
SW<14>=1.. 
SW<13>=1.. 
SW<12>=1.. 
SW<11>=I.. 
SW<10>=1.. 
SW<9>=1... 
SW<8>=1.... 

SH<7>=1.... 



5W<7>sl. 



OCTAL 

i m 

20000 
100CO 
4000 
200C 

l © 

200 



200 



HALT ON ERROR 
LOOP ON CURRENT TEST 
INHIBIT ERROR TYPE OUTS 
INHIBIT T-BIT TRAPPING 
INHIBIT ITERATIONS 
RING TTY BELL ON ERROR 
LOOP ON ERROR 

LOOP ON TEST SPECIFIED IN SW'5 
THROUGH SW<0> 

PRINT ERROR SUMMARY EVEN IF 
SW<13>*1. THIS APPLIES ONLY 'C 
PROGRAM OFF PA. 

DESELECT CORRECT INTERRUPT TEST IN 
PROGRAM OFFPB. NOTE THAT THIS TEST 
WILL AUTOMATICALLY BE DESELECTED BY 
THE ABSENCE OF THE SPECIAL TEST 
EQUIPMENT DESIGNED TO CONDUCT THIS 
TEST. IF THIS EQUIPMENT IS NOT 
INSTALLED THERE IS NC NEED TO 
DESELECT THIS TEST. THIS APPLIES 
ONLY TO PROGRAM OFFPB! 



ERRORS 



SUMMARIES 

IN PROGRAM DFFPA TESTS 1 AND 11 HAVE A SPECIAL ERROR 
SUMMARY FEATURE. THESE TUO TEST RUN MANY TEST 
PATTERNS THROUGH THE LOGIC. AFTER AN ERROR IS 
ENCOUNTERED, ONLY THE FIRST FIVE ERRORS ARE REPORTED 
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281 
283 



2% 

287 

288 

289 

290 

291 

292 

2=33 

294 

295 

2% 

297 

299 

299 

300 

301 

302 

303 

304 

305 

306 

307 

208 

309 

310 

311 

312 

313 

314 

315 

31b 

317 

318 

319 

320 

321 

322 

323 

324 

325 

32b 

327 

328 

329 

330 

331 

332 

333 

334 

235 

33b 
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(TYPED ON THE TTY) . EVERY ERROR THOUGH 
AND AN ERROR SUMMARY 15 PRIN'ED WHEN THE T E5T IS 
COMPLETE. NOTE THAT IS SW< 13>=1 THIS SUMMARY WILL 
NOT BE TYPED UNLESS SW<7>=1. IN OTHER UQRDS TO GET 
JUST AN ERROR SUMMARY FROM EITHER OF THESE "UO TESTS 
1 AND 11 IN PROGRAM DFFPA BOTH SWITCHES 13 AND 7 
MUST = 1. 



b.2 



e. 

8.1 

e.2 
a. 3 



8.4 



8.5 



ERROR RECOVERY 
SW<15:9>=0... 



SU<15>sl.. 



NONE 



MOST ERRORS WILL CAUSE EXECUTION TO- 
GO TO THE START OF THE NEXT TEST 
AFTER THE MESSAGE IS TYPED. A FEW 
TESTS ARE IN SECTIONS. IN THESE 
TESTS AN ERROR WILL CAUSE EXECUTION 
TO GO TO THE NEXT SECTION AFTER THE 
MESSAGE IS TYPED. 

THE PROGRAM WIlL HALT AFTER TYPING 
THE ERROR MESSAGE. PRESSING THE 
CONSOLE CONTINUE WILL CAUSE THE 
PROGRAM TO CONTINUE AS IF SW<15>=0. 

RESTRICTIONS 



MISCELLANEOUS 



EXECUTION TIMES 

LESS THAN 10 SECONDS FOR EACH PROGRAM ON ANY PASS. 
STACK POINTER 

THE STACK POINTER IS INITIALIZED TO 1100 IN EACH 
THE THREE PROGRAMS. 

PASS COUNT 



OF 



THE PROGRAM MAKES ONE PASS FOR EACH END OF PASS 
MESSAGE TYPED. THE END OF PASS MESSAGE DESCRIBES 
THE TOTAL NUMBER OF PASSES COMPLETED AND THE TOTAL 
NUMBER OF ERRORS SINCE THE LAST END OF PASS MESSAGE. 

T-BIT TRAPPING 

IF SW<12>=0 EACH PROGRAM WILL RUN WITH TRACE TRAPS 
ON EVERY OTHER PASS. FIRST PASS WILL NOT ENABLE 
TRACE TRAPS. NOTE SW<12>=! DISABLES T-BIT TRAPS. 

SOFTWARE SWITCH REGISTER 
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337 EACH OF THE THREE PROGRAMS WILL RJN UI T H OR -JlTHOw"* 

338 A CONSOLE SWITCH REGISTER. IF A PHYSICAL CONSOLE 

339 SWITCH REGISTER IS PRESENT ON THE SYSTEM THEN THESE 
34C PROGRAMS WILL GO AHEAD AND USE IT FOR THE SWITCH 

341 ^UNCTIONS DESCRIBED IN S.l ABOVE. IF HOWEVER THERE 

342 IS NO CONSOLE SWITCH REGISTER ON THE SYSTEM A 
243 SOFTWARE SWITCH REGISTER WILL BE USED. THIS 
3*H SOFTWARE SWITCH REGISTER CAN BE EXAMINED OR MODIFIED 

345 AT ANY TIME BY THE USER IF HE TYPES CONTROL G WHILE 

346 THE PROGRAM IS RUNUNG. THIS CONTROL G WILL CAUSE 
3^7 THE CONTENTS OF THE SOFTWARE SWITCH REGISTER TO BE 
34S TYPED ON THE TTY AND ASK THE USER FOR A NEW VALUE. 
3*49 WHEN THE USER TYPES A VALUE AND CARRIAGE RETURN THEN 

350 THE PROGRAM WILL RESUME TESTING AT THE SAME POINT AT 

351 WHICH IT LEFT OFF WHEN THE USER TYPED CONTROL G. 
2S2 NOTE THAT WHEN NOT RUNNING UNDER ACT. APT OR CHAIN 

353 THE USER WILL BE ASKED FOR A SOFTWARE SWITCH 

354 REGISTER VALUE AFTER LOADING ADDRESS 200 AND 

355 STARTING THE PROGRAM THE FIRST TIME THE PROGRAM IS 

356 RUN AFTER LOADING (ONLY IF NO CONSOLE SWITCH 

357 REGISTER IS ON THE SYSTEM). 
358 

359 

360 6.6 INTERRUPTS TEST 

361 

362 IN PROGRAM DFFPB THERE IS A SPECIAL TEST FOR 

363 CHECKING THE CORRECT FLOWS OF THE FPP. THIS TEST 

364 CAN BE RUN ONLY IF A SPECIAL TEST MODULE IS IN THE 

365 SYSTEM. THIS MODULE WILL PROBftfiLY ONLY BE USED IN 

366 MANUFACTURING. IF THIS NOOULE IS NOT IN THE SYSTEM 

367 THIS TEST WILL AUTOMATICALLY BE DESELECTED. IF THIS 

368 TEST MODULE IS ON THE SYSTEM AND SW<7>=0 THIS TEST 

369 "ILL BE RUN. IF SW<7>=1 THIS TEST WILL BE 
270 DESELECTED. 

371 

372 

373 8.7 ACT, APT AND XXDP COMPATIBILITY 

374 

375 THESE PROGRAMS ARE FULLY COMPATIBLE WITH: 

377 ACT 

378 XXDP MONITOR AND CHAIN PROGRAMS. 
379 

382 
381 
382 
383 
38H 
3B5 
386 
287 

388 9. PROGRAM DESCRIPTION 

389 - 

390 

391 
392 
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393 
29M 

395 

3% TEST 1 ROUND\TRUNk TEST 

397 

398 

399 THIS IS fl TEST OF THE ROUND\ TRUNK FLOWS. Ih 

MOO PARTICULAR TWO THINGS ARE TESTED: FIRST A CONDITION 

4C1 IN WHICH ROUNDING RESULTS IN THE NEED FOR 

402 RENORNAL I ZAT I ON . AND SECOND THC PSW CONDITION CODES 

403 N AND Z BIT COMBINATIONS 
•404 

405 TEST 2 OVER\UNDER TEST 

406 

i07 

409 THIS IS A PARTIAL TEST OF THE OVER\UNDER FLOWS. ONE 

409 OVERFLOW AND TWO UNDERFLOW CONDITIONS ARE CHECKED. 

410 THE REMAINING UNDERFLOW CONO. AND THE REMAINING 

411 OVERFLOW COND. WILL BE CHECKED LATER USING THE XXX 

412 INSTRUCTION. HERE EACH CONDITION TESTED IS CHECKED 

413 BOTH WITH TRAPS ENABLED (FIU=1 OR FIV=1 ) AND ALSO 

414 WITH TRAPS DISABLED (FIU=0 OR FIVrQ). 
415 

416 TEST 3 LOCFD AND LDCDF TEST 

417 

tlB 

419 THIS IS A TEST OF LDCFD AND LDCDF. 
420 

421 TEST 4 CNPO TEST 

422 

424 THIS IS A TEST OF THE CNPO INSTRUCTION. NOTE THAT A 

425 SUBROUTINE IS USED TO SET UP OPERANDS, EXECUTE THE 

426 INSTRUCTION AND CHECK THE RESULTS 
427 

428 TEST 5 DIVD WITH (FSRC=0) AfC (BUT FD) TEST 

4 2 g 

430 

431 THIS IS A TEaf OF THE DIVD INSTRUCTION WITH ,1 ZERO 

432 OIVISOR. THE CONDITION IS CHECKED WITH BOTH 'RAP 

433 ENABLED AND TRAPS DISABLED. 
434 

435 TEST 6 DIVF TEST 

43fc 

437 

438 THIS IS A TEST OF THE DIVF INSTRUCTION. NOTE THAT A 

439 SUBROUTINE IS USED TO SET UP THE OPERANDS, EXECUTE 

440 THE INSTRUCTION AND CHECK THE RESULTS. 
441 

442 TEST 7 DIVD TEST 

443 

444 

445 THIS IS A TEST OF THE DIVD INSTRUCTION. NOTE THAT A 

446 SUBROUTINE IS USED TO SET UP THE OPERANDS, EXECUTE 

447 THE INSTRUCTION AND CHECK THE RESULTS. 
44e 
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449 TEST 1C MULF TEST 

450 - 

•451 THIS IS A TEST O r THE MULF INSTRUCTION. I T FAKES 

452 'JSE OF A SUBROUTINE TO SET UP THE OPERANDS. EXECUTE 

453 THE MULF INSTRUCTION AND CHECK THE RESULTS. 
454 

45S TEST 11 MULD TEST 

455 - 

457 

458 THIS IS A TEST OF THE MULD INSTRUCTION. NOTE THAT A 

459 SUBROUTINE IS USED TO SET UP THE OPERANDS , EXECUTE 

460 THE MULD INSTRUCTION AND CHECK THE RESULTS. 
461 

452 TEST 12 UNDER\OVER FLOU, USING MULF WITH TRAPS DISABLED, 'EST 

453 

454 

465 THIS IS A TES T OF THE OVERFLOW AND UNDERFLOW 

466 CONDITIONS USING THE MULF INSTRUCTION WITH TRAPS 

467 DISABLED. NOTE THAT A SUBROUTINE IS USED TO SET UP 

468 THE OPERANDS, EXECUTE THE MULF INSTRUCTION AND CHECK 

469 THE RESULTS. 
470 

471 TEST 13 UNDERCOVER FLOW. USING MULD WITH TRAPS DISABLEC. TEST 

472 

473 

474 THIS IS A TEST OF THE OVERFLOW AND UNDERFLOW 

475 CONDITIONS THAT CAN ARRISE USING THE MULD 

476 INSTRUCTION WITH TRAPS OISABLED. A SUBROUTINE IS 

477 USED TO SET UP THE OPERANDS, EXECUTE THE MULD 

478 INSTRUCTION AND CHECK THE RESULTS. 
479 

480 TEST 14 UNDERCOVER FLOW, USING MULF WITH TRAPS ENABLED. TES T 

4B1 

482 

433 THIS IS A TEST OF THE UNDERFLOW AND OVERFLOW 

484 CONDITIONS THAT CAN OCCUR USING THE MULF 

485 INSTRUCTION. A SUBROUTINE IS CALLED TO SET UP THE 

486 OPERANDS, EXECUTE THE MULF INSTRUCTION AND CHECK THE 
497 RESULTS. HERE THE PARTICULAR INTERRUPT. EITHER 

488 OVERFLOW OR UNDERFLOW, IS ENABLED SO A TRAP SHOULD 

489 OCCUR. 
490 

491 TEST 15 UNDERCOVER FLOW, USING MULD WITH TRAPS ENABLED. TEST 

492 

493 

494 THIS IS A TEST OF THE OVER FLOW AND UNOER FLOW 

495 CONDITIONS USING THE MULD INSTRUCTION WITH TRAPS 

496 ENABLED. A SUBROUTINE IS USEO TO SET UP THE 

497 OPERANDS, EXECUTE THE MULD INSTRUCTION AND CHECK THE 

498 RESULTS. 
499 

500 TEST 16 MODF TEST 

501 - 

502 

503 THIS IS A TEST OF THE MOOF INSTRUCTION. WHICH MAKES 

504 USE OF A SUBROUTINE TO SET UP THE OPERANDS. EXECUTE 
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505 THE flODF INSTRUCTION AND CHECK THE RESULTS. 

507 TEST 17 MOOD TEST 

508 — 

509 

510 THIS IS A TEST OF THE MODD INSTRUCTION. IT HAKES 

rtj USE OF A SUBROUTINE TO SET UP THE ARGUMENTS, EXECUTE 

512 THE INSTRUCTION AND CHECK THE RESULTS. 

514 TEST 20 UN0ER\0VER FLOW, USING MODF WITH TRAPS DISABLED. TEST 

515 

i'7 THIS IS A TEST OF THE MODF OVERFLOW AND UNDERFLOW 

513 CONDITIONS. IT MAKES USE OF A SUBROUTINE TO SETUP 

519 THE OPERANOS, EXECUTE THE MODF INSTRUCTION AND CHECK 

520 THE RESULTS. TRAPS ARE DISABLED DURING THIS TEST. 



521 



TEST 21 UNDERNOVER FLOW, USING MODD WITH TRAPS DISABLED, TES' 



523 
524 

525 THIS IS A TEST OF THE MODD INSTRUCTION'S OVER FLOW 

526 AND UNDER FLOW CONDITIONS. A SUBROUTINE IS USED TO 

527 SET UP THE OPERANDS , EXECUTE THE MODD INSTUCTION AND 

528 CHECK THE RESULTS, 
cpo 

530 TEST 22 INTERRUPT CORRECT FLOWS TEST 

531 

532 

533 THIS IS A TEST OF THE 'CORRECT' FLOWS. THIS PART OF 

534 THE MICRO COOE HAS AS ITS PURPOSE INSURING THAT 

535 INTERRUPT REQUESTS MAOE DURING CERTAIN LENGTHY F&P 

536 INSTRUCTIONS GET HONORED. THIS IS DONE IN A WAY 

537 SUCH THAT IF AN INTERRUPT REQUEST OCCURS DURING ONE 

538 OF THESE INSTRUCTIONS THE STATE OF THAT 

539 INSTRUCTION'S EXECUTION WILL BE THE SAME AS IF THAT 
54C INSTRUCTION HAD NEVER BEEN FETCHED AND ITS EXECUTION 

541 NEVER STARTED. THUS THE MICRO CODE WILL RESTORE ALL 

542 REGISTERS, BACK UP THE PC AND LEAVE THE FPS AND ACQ 

543 THROUGH AC5 UNMODIFIED. 

544 THE INSTRUCTIONS FOR WHICH THIS IS NECESSARY ARE: 
545 

546 ADD (OR SUB) 

547 DIV 

548 MUL 

549 MOD 

550 (BOTH OOUBLE ANO FLOATING) 

552 ALL ADDRESSING MODES WILL BE TRIED WITH THE ADDD 

553 INSTRUCTION. THEN EACH OF THE OTHER INSTRUCTIONS 

554 WILL BE TRIED USING MODE 1 . NOTE THAT THIS TEST 

555 NEEDS A SPECIAL INTERRUPT MODULE, WHICH WILL 

556 PROBABLY ONLY BE PRESENT IN DEC'S MANUFACTURING 

557 ENVIRONMENT TO RUN. THIS SPECIAL EQUIPMENT IS 

558 DESIGNED TO RAISE AN INTERRUPT REQUEST IN THE 

559 PROCESSOR IF A BIT IS SET IN ITS STATUS REGISTER AND 
562 CNLY WHEN AN FPP INSTRUCTION IS ENCOLNTERED. 
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ct! THEREFORE THIS TEST WILL BE RUN CONDITIONALLY 

IbP (OEPENOENT UPON WHETHER OR NOT THE STATUS REGISTER 

5b3 OF THE TEST EQUIPMENT TIMES OUT WHEN REFERENCED J . 

IbS THIS TEST CAN ALSO BE DESELECTED BY TURNING-SWITCH 7 

IfeS OF THE SWITCH REGISTER (PHYSICAL OR VIRTUAL J ON. 

fbb THE TEST ASSUMES THAT THE TEST EQUIPMENT'S STATUS 

5 & 7 REGISTER IS AT LOCATION 77777H (NOTE THAT ALL 

|b8 REFERENCES TO THIS LOCATION ARE MADE INDIRECT 

HI THROUGH THIS PROGRAMS LXATION CORINT. 50 THAT IF 

570 THE USER HAS MODIFIED THE TEST EQUIPMENT'S STATUS 

571 REGISTER TO RESPOND TO A DIFFERENT ADDRESS LOCATION 

572 CORINT MUST BE MADE TO CONTAIN THAT STATUS 

573 REGISTER'S NEH ADDRESS). THIS PROGRAM ASSUMES THAT 

574 THE TRAP VECTOR FOR THE TEST EQUIPMENT IS 110. 

575 AGAIN NOTE THAT ALL REFERENCES TO THIS TRAP VECTOR 
57b ARE INDIRECT, THROUGH THIS PROGRAM'S LOCATION CORTRP 
577 (IF THE TE$T EQUIPMENT IS MADE TO TRAP TO A 
57B DIFFERENT VECTOR LOCATION CORTRP MUST CONTAIN THE 
579 ADDRESS OF THIS VECTOR). 

580 
S81 
5B2 
583 
584 
585 
58b 
587 
588 
589 

590 10. LISTING 

591 

592 

593 
594 
595 
5% 
597 
598 
599 

bOO & 
bOl 

b02 0002bb MNUMBER=2bb 

b03 000002 PR0GNUM=2 

bOH 

bOS 

bOb 

b07 .LIST ME 

b08 .NLIST MO,MC,CNO 

b09 

blO 

bll 

bl2 

bl3 

bl4 

BIS 

bib 
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000001 
lbOOOO 



000244 
177400 
000200 
000011 
000015 



001100 



000011 
000012 
000015 
000200 
17777b 

177774 



. ENABL A8S 



POP 11/34 FPP DIAGNOSTIC PART 2 



.TITLE MAINDEC-11-DFFPB-A 
•COPYRIGHT (C) SEP 197b 
♦DIGITAL EQUIPMENT CORP. 
*MAYNARD , MASS. 01754 
« 

•PROGRAM BY ANTHONY S. VEZZA 

•THIS PROGRAM UAS ASSEMBLED USING THE PDP-11 MAINDEC SYSMAC 
♦PACKAGE (MAIN0EC-11-DZQAC-C2), SEPT 14, l<37b. 

JSURslbOOOO ;;HALT ON ERROR, LOOP ON TEST, INHIBIT ERROR TYPOUT 



FPVECT=244 
$SWR=177400 
$SURMSK=200 
TAB= 11 
CRLF=15 

. SBTTL BASIC DEFINITIONS 

:*INITIAL ADDRESS OF THE STACK POINTER *** 1100 *** 
STACK= 1100 

.EQUIV EMT , ERROR ; ; BASIC DEFINITION OF ERROR CALL 

.EQUIV IOTISCOPE ii BASIC DEFINITION OF SCOPE CALL 



iMISCELLANEOUS DEFINITIONS 



HTs 
LF= 
CR= 
CRLF= 
PS= 
.EQUIV 



11 
12 
15 
200 
17777b 
PS.PSW 



STKLMTs 177774 



;;C0DE FOR HORIZONTAL TAB 
CODE FOR LINE FEED 
CODE FOR CARRIAGE RETURN 
CODE FOR CARRIAGE RETURN-LINE FEED 
• ; PROCESSOR STATUS WORD 

;; STACK LIMI" REGISTER 



NAINDEC-11-DFFPB-A 



DfFPBA.Pll 


01-NCV-7b 


673 


177772 


674 


177570 


b7S 


17757C 


b7b 




fa77 




678 


000000 


679 


000001 


b8C 


000002 


b8l 


000003 


6.82 


000004 


683 


000005 


b8M 


000006 


bBS 


000007 


b8b 


000006 


b87 


000007 


698 




b89 




b90 


000000 


691 


000040 


692 


000100 


693 


000140 


694 


000200 


69S 


000240 


b% 


000300 


697 


000340 


698 




699 




700 


100000 


701 


040000 


702 


020000 


703 


010000 


704 


004000 


705 


002000 


70b 


001000 


707 


000400 


708 


000200 


709 


000100 


710 


000040 


711 


000020 


712 


000010 


713 


000004 


714 


000002 


715 


000001 


71b 




717 




718 




719 




720 




721 




722 




723 




724 




725 




726 




727 




72e 


130000 



POP 11 34 FPP DIAGNOSTIC PART 2 MACY11 
21:06 BASIC DEFINITIONS 

PIRQ= 177772 
DSUR= 177570 
DDISP= 177570 



NO! 

27(1006) 



01-N0V-76 21:12 PACE 13 



PROGRAM INTERRJPT REQUEST REGISTER 
HARDWARE SWITCH REGISTER 
HARDWARE DISPLAY REGISTER 



* GENERAL PURPOSE REGISTER DEFINITIONS 



R0= 
Ri= 
R2= 
R3= 
R4= 
R5= 
R6= 
R7= 
SP= 
PC= 



X2 
Y.3 
Y.H 

y.s 

Xb 

V.7 

•/.& 
v.7 



GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
GENERAL REGISTER 
STACK POINTER 
PROGRAM COUNTER 



•PRIORITY LEVEL DEFINITIONS 



PRO= 
PR1= 
PR2= 
PR3= 
PR4= 
PRS= 
PR6= 
PR7= 



0 
40 
100 
140 
200 
240 
300 
340 



PRIORITY LEVEL 0 
PRIORITY LEVEL 1 
PRIORITY LEVEL 2 
PRIORITY LEVEL 3 
PRIORITY LEVEL 4 
PRIORITY LEVEL 5 
PRIORITY LEVEL b 
PRIORITY LEVEL 7 



•"SWITCH REGISTER" SWITCH DEFINITIONS 



SWISs 
SW14= 
SU13= 
SW12= 
SH11 = 
SW10= 
SW09= 
SW08= 
SW07= 
SW06= 
SW05= 
SW04= 
SW03= 
SW02= 
SW01= 
SWOO= 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 



100000 
40000 
20000 
10000 
4000 
2000 
1000 
400 
200 
100 
40 
20 
10 
4 
2 
1 

SW09,SW9 
SW08.SW8 
SW07.SW7 
SW06,SW6 
SW05,SW5 
SW0H,SW4 
SW03 SW3 
SW02.SW2 
SW01 f SWl 
SWOO.SWO 



; *DATA BIT DEFINITIONS (BITOO TO BIT15) 
BIT15= 100000 



'29 

'33 
'> 
'35 
'36 

T 
*38 
~3<3 
'•C 

742 
~43 

745 
7% 
747 

7HS 

ts: 

752 
753 
754 
755 
756 
757 
756 
759 
76C 
76: 
762 
753 
76*4 
765 
766 
767 
768 
769 
773 
771 
77c 
773 
774 
775 
776 
777 
776 
77S 
7BC 

7e: 
7e2 

782 
78- 



B02 
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BASIC DEFINITIONS 




OOCi; 
300C4C 
0COO2C 
DJ001C 
000004 
DC00G2 
2C00C1 



000004 
00001C 
OOOCl 4 * 
000014 
000014 

00002C 
000024 

000030 
000034 
Q000&0 
000064 
00C24Q 

000000 

gogggi 

000002 
000003 
000004 
000005 
000006 
000007 



000000 



000174 



eri4= 

BITl3s 
BIT 12= 
BITlls 
BIT10= 
BITOS= 
BIT08= 
BIT07= 
BIT06= 
BIT05= 
BIT04= 
BIT03= 
BIT02= 
BITOlr 

SITOO= 
.EOUIV 
.EQUIV 
.EOUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 
.EQUIV 

:*8ASIC 
ERRVEC* 
RESVECs 
T8ITVEC: 
TRTV€C= 
BPTV£C= 
IOTVECr 
PURV£C= 
EMTVEC= 
TRRPVEC: 
TKVEC= 
TPVEC= 
PIRQVEC: 

ACO 
AC1 
AC2 
AC3 
AC4 
PCS 
AC6 
AC7 



40000 
20000 
10000 
4000 
2000 
1000 
4C 



100 

40 

20 

10 

4 

2 

BITOS.BITS 
BIT06.BIT8 
BIT07.BIT7 
BIT06.BIT6 
BITQS.BITS 
BIT04.BIT4 
BIT03.BIT3 
BIT02.BIT2 
BIT01,BIT1 
BITOO.BITO 

-CPU" TRAP VECTOR ADDRESSES 

4 ; ; TIME OUT AND OTHER ERRORS 

10 ;;RES£RVEO AND ILLEGAL INSTRUCTIONS 

14 ; -T- BIT 

14 ;; TRACE TRAP 

14 ;, -BREAKPOINT TRAP (BPT) 

20 ; ; INPUT 'OUTPUT TRAP clOT) t*SCOPE#* 

24 POWER FAIL 

EMULATOR TRAP fEHT) *#ERR0R** 
-TRAP" TRAP 
TTY KEYBOARD VECTOR 
TTY PRINTER VECTOR 
. .PROGRAM INTERRUPT REQUE5 T VECTOR 
FPP REGISTER DEFINITIONS 



30 

:34 

60 
64 

=240 
.S8TTL 
=vcO 
='/.l 

-y.2 

s-/.4 

-y.S 

=X6 

=X7 



.SBTTL TRAP CATCHER 
.=0 

;*ALL UNUSED LOCATIONS FROM 4-776 CONTAIN A ".♦2, HALT" 
;*SEQUENCE TO CATCH ILLEGAL TRAPS AND INTERRUPTS 
;*L0CATION 0 CONTAINS 0 TO CATCH IMPROPERLY LOADED VECTORS 
.=174 



C02 
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Df"»9fl.P:: 0:-N0\-7fe 2l:C& TRAP catcher 

m St3 $888 BIB!* :U8i8 8 iifS£?B8f »4» 

"TT" .SBTTL STARTING AOORESS(ES> 

"88 XC13" 3C-»33fc JHF JiSTART : : JUflP TO STARTING ADDRESS OF PROGPAT 



NAINDEC-11-DP C PB-A °oc 
dffpba.pii c:-NCv-7fc =:-.z-b 

789 
790 

791 
792 
793 

79S XilX 

7% mux 

797 MUX OOOOCQ 

798 XI 102 0OC 

799 X11Q3 XC 
3X X1104 0OOOOC 
80 1 MllQb oooooc 
BC2 X1110 XXX 
903 X1112 XXX 
BOM M111H XC 

905 Qcius op: 

80b Xlllb OOOOOC 

807 X1120 OOOOOC 

BOB XI 122 XXX 

809 xii2M ggpogg 

810 X1126 OOXCO 

e:i xnx xoox 

812 X1132 XOCOO 

813 X113H OX 

814 X1135 XC 

815 X1136 OOOOOC 
Bib X114G 177570 

817 X1142 177570 

818 X114M 177560 
619 Xll% 177562 

820 X11SC 177564 

821 X1152 177566 

822 X1154 00C 

823 XI 155 002 

824 XU56 012 

825 XI 157 XO 

826 X1160 XXX 
827 

828 Xllb2 OOOOOC 

829 X1164 OOOOOC 
8X X1166 XXX 

831 X1170 0OCO00 

832 X1172 000000 

833 X1174 OOOOOC 

834 X1175 0OOOO0 
e35 X12X OOOOOC 

836 X1202 000000 

837 X1204 0O0OO0 
S38 XI 206 OOOOOC 
e3S X1210 OOOOOC 
840 X1212 0OOCO0 
eni X1214 OOOOOC 
242 X121b OOCCOC 
942 X1220 OOOOOC 
2*. X1222 XXX 



D02 
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COMMON T AGS 

. SBTTL COMMON TAGS 



01-N0V-76 21:12 PAGE lfe 



:»THIS TABLE CONTAINS VARIOUS COMMON STORAGE LOCATIONS 
:t'JSED IN THE PROGRAM . 



SCNTAG: 

STSTNM: 

SERFLG: 

SICNT: 

SLPAOR 

ILPEPR 

SERTTL 

SITEMB 

SERJ1AX 

SERRPC 

SGOAOR 

S8DADR 

SGOOAT 

SBOOAT 



SAUTOB: 
SINTAC: 

SUR* 

OISPLAY 

ITKS: 

STKB: 

ITPS: 

ITPB: 

SNULL: 

SFILLS 

SFILLC 

STPFLG 

SREGAO 

SREGO: 

SREG1 : 

SREG2: 

SREG3: 

SREG4: 

SREG5: 

SREG6: 

IREG7: 

SREG10: 

SREG11: 

SREG12: 

SREG13: 

SREG14: 

SREG15: 

SREGlb: 

SREG17: 

SREG20: 



.=1100 

.WORC 
.BVE 
.BYTE 
.UORO 
.WORD 
.UORO 
.UORO 
.BYTE 
.BYTE 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
• BYTE 
.BYTE 
.UORO 
.UCRO 
: .UORO 
177560 
177562 
177564 
177566 
.BYTE 
.BYTE 
.BYTE 
.BYTE 
.WORD 

.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 



c 

0 
0 
Q 
0 
0 
0 
0 

1 

0 
0 
0 
0 
0 
0 
0 
0 
0 
0 

DSUR 
00 ISP 



0 
2 
12 
0 

c 

0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 
0 



; ; START OF COMMON TAGS 

CONTAINS THE TEST NUMBER 
CONTAINS ERROR FLAG 
CONTAINS SUBTEST ITERATION CCJN* 
CONTAINS SCOPE LOOP AD09ESS 
CONTAINS SCOPE RETURN FOR ERRORS 
CONTAINS TOTAL ERPORS X TEC TEC 
CONTAINS I TEH CONTROL BYTE 
CONTAINS MAX. ERRORS PER TEST 
CONTAINS PC OF LAST ERROR INSTRXTION 
CONTAINS AOORESS OF 'GOOD' DATA 
CONTAINS AOORESS OF 'BAD* DATA 
CONTAINS 'GOX' DATA 
CONTAINS 'BAD* DATA 
RESERVED — NOT TO BE USED 

:; AUTOMATIC NODE IfCICATOR 
:: INTERRUPT MOOE INDICATOR 

AOORESS OF SUITCH REGISTER 
AOORESS OF DISPLAY REGISTER 
TTY KBO STATUS 
TTY KBO BUFFER 

TTY PRINTER STATUS REG. AOORESS 
TTY PRINTER BUFFER REG. AOORESS 
CONTAINS NULL CHARACTER FOR FILLS 
CONTAINS I OF FILLER CHARACTERS REQUIRED 
INSERT FILL CHARS. AFTER A "LINE FEEC" 
"TERMINAL AVAILABLE" FLAG (BIT<07>=0=YES) 
CONTAINS THE AOORESS FROM 
UHICH (SREGO) HAS OBTAINED 



CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 
CONTAINS 



(SREGAO HO) 
(SREGA0H2) 
(SREGA0H4) 
(SREGAO) +6) 
(SREGAOHlO) 
(SREGAO HI 2) 
(SREGAO)* 14) 
(SREGAO)* lb) 
($REGA0)+20) 
(SREGAOJ+22) 
(SREGA0H24) 
(SREGA0H26) 
(SREGAO)OO) 
(SREGA0H32) 
(SREGA0H34) 
(SREGA0)+36) 
(SREGAO) +40) 



E02 
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COMMON T^S 



945 
94b 

9S7 



950 



953 

9S5 
35b 
9S7 
9S9 
959 
8bC 



9b3 
8fc4 
365 
9fcb 

9b7 

9be 

9b3 

S^TJ 
c-t 

372 

373 

874 

375 

87b 

277 

878 

S7C 

880 
881 
882 
883 
884 
385 
38fc 
387 



883 
890 

891 
892 
333 
994 
535 

e% 

837 
338 
833 

3:: 



CC122M 
30122% 
X12X 

3811^ 

Xl23fc 

3if$ 

XI 244 
X12% 
X12S0 
X12S2 
X12SM 
X12S6 
X12BC 
Xl2b2 

3oiH2 

X1270 
X1272 
X127M 
X127S 
X130C 
X1302 
X1304 
X1306 
X1312 
X1313 
X1314 



X131b 
X131b 
X132C 
X1322 
X132M 
X132b 
X13X 
X1332 
X133M 
X133fc 
X1338 
XI 337 
X1340 
X13M2 

X1344 



x oox 
xoooo 
xcooc 



xcooc 



xoooc 
xoooo 
xoooc 



xcxc 
xoooo 
xoox 



DOCOOO 

xoooc 
xcooc 
xxoc 

xoooc 
xoooc 
xcooc 

!77bC7 
C77 
C15 

XCC12 



xoox 
xoooc 
xoooc 
xoox 
xoox 
xoox 
xoox 
xoox 

xo 

000 
XXX 
XXX 

xoooc 



IREG21 
5REG22 
SREG23 

m 

STNP2 
JTNP3 
$TMP4 
STNPS 
ITNPb 
STNP7 
ITHPlO 
STNP11 
STNP12 
STMP13 
STNP14 
STNP1S 
STNPlb 
STHP17 
STNP20 
STNP21 
STMP22 
STMP23 
$ T IMES 
SESCAP£:0 
S8ELL 



WORD 
UORO 
UORO 



UORO 



UORO 
UORO 
UCRO 

UORO 
UORO 
UORO 
UORO 
UORO 
UORO 
UORO 
UORO 
UORO 
UORO 
UORO 



0 
0 

c 



0 
0 
0 



0 

0 

0 

0 

0 

0 

0 

0 

D 
n 



S3UES 
5CRLF 
SLF 



.ASCIZ <207>'377><377> 

.ASCII /" 

.ASCII <1S> 

A§CIZ <I2> 



CONTAINS ( (iREGAC J+42, 
CONTAINS ( (IR£GAC:*4S: 
CONTAINS <<IREGAO)<HS> 

USER DEFINED 

m 

IICO 
I NED 
I NED 

15E 

m 
m 

I NED 

... m 

USER DEFINED 
USER DEFINED 
USER DEFINED 

MAX. NUMBER OF IT£RA T IONS 
FSCAPE ON ERROR ADDRESS 
CODE FOP BELL 
QUESTION NARK 
CARRIAGE RETURN 
LINE FEED 



ISBTTL APT NAILBOX-ETABLE 



Xi34fc 



OX 



.EVEN 

SlSGTY 

SFATAL 

STESTN 

SPASS: 

SOEVCT: 

SUNIT: 

fMSGAD: 

SMSGLG: 

SETABLE 

SENV: 

SENVM: 

SSUREG: 

SUSUR: 

JCPUOP: 

:* 



iflAflSi : 



##♦*♦#*•**♦*§#»#»*****##*##«####«*#**#♦***♦♦♦******♦***** 



.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
.UORO 
• UORO 
.UORO 

.BYTE 
.BYTE 
.UORO 
.UORO 
.WORD 



AMSGTY 

AFATAL 

ATESTN 

APASS 

AOEVCT 

AUNIT 

AMSGAO 

ANSGLu 

AENV 

AENVM 

ASUREG 

AUSUR 

ACPUOP 



.BYTE AMANS1 



APT MAILBOX 
MESSAGE TYPE CXE 
FATAL ERROR NUMBER 
TEST NUMBER 
PASS COUNT 
CEVICE COUNT 
I/O UNIT NUMBER 
MESSAGE AOORESS 
MESSAGE LENGTH 
APT ENVIRONMENT TABLE 
ENVIRONMENT BYTE 
ENVIRONMENT MOOE BITS 
APT SUITCH REGISTER 
USER SWITCHES 
;:CPU TYPE, OPTIONS 
BITS 15-1UCPU TYPE 

1 1 /0M=01 , 1 1 /0S=02 ,11/ 20=03 .11' 40=04 . 1 1 4S=C5 
ll/70=Ob,PDO=07,Q=lO 
BIT 10=REAL TIME CLOCK 
BIT 9=FL0ATING POINT PROCESSOR 
BIT 8=MEN0RY MANAGEMENT 
;;HlGh ADDRESS, M.S. BYTE 



IfilfOEC-K-OTTPB-H 





l-NOV-"" 


9c: 

90S 


CC1247 




903 






905 






906 


X13SC 




3E 

906 


001352 


QQC 

WWW 


9C9 


X13S3 


OX 


912 


X13S* 


nornon 


911 


001356 


tine 

Www 


91c 


001357 


OX 


913 


001360 


rmmnn 


91-4 


X1362 




915 


001363 


OX 


91b 


X1364 


rmmrn 


917 


001366 


(YYHYT! 


913 


001370 




919 


001372 




920 


XI 374 




921 


001376 


QQQOOQ 


922 


001400 


rmnrr! 


923 


001402 


nnnnnfi 


924 


001404 


rmnm 


925 


X1406 


mmnp 


926 


X1410 


nnmnr 


927 


X1412 


nmnm 

wwwwww 


928 


X1414 


□ODono 

UUwUUO 


929 


X1416 


WWWWWW 


930 


X1420 


wvUuww 


931 


X1422 




932 


X1424 




933 


X1426 


JUUUUw 


934 


XHX 


xoox 


935 


XH32 


oooox 


936 


X143S 


xoox 


937 


X1H36 


xxoc 


938 


321 -HO 


3cxc: 


939 






9"*L 






9-1 


ZZ.--1 
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1MTYP1: 
:» 
:» 
:* 

iflfiORl: 

tf1flftS2 

1MTYP2 

SNADR2 

SMAHS3 

IHTYP3 

1HA0R3 

iHANS4 

JHTYP4 

SHADR4 

IVECT1 

1VCCT2 

I8ASE 

SDEVH 

SC0U1 

SC0W2 

SO0U0 

iOOUl 

SDDU2 

S00U3 

S0OW4 

SD0WS 

S00U6 

SDDW7 

S00U8 

$XW9 

SOOW10 

S00W11 

JD0W12 

SDDW13 

SD0U14 

ID0W15 



JE T E4C: 



BYTE Af«TYPl 



.WORD AMADR1 



.BYTE 
.BYTE 
.WORD 
.BYTE 
.BYTE 
.WORD 
.BYTE 
.BYTE 
.WORD 



WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
,W0R0 
.WORD 
.WORD 
.WORD 
.WORD 
WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



AMW1S2 
AHTYP2 
AMA0R2 
ANAMS3 
AHTYP3 
AMA0R3 

amahS4 

AHTYP4 
ANA0R4 

AVEC T 1 
AVECT2 
ABASE 

Aoevn 

ACDW1 
AC0W2 
ftOOWO 
A00W1 
A00U2 
AD0W3 
fiOCWH 
ADDWs 
ADDkfc 
«D0W7 
A00W8 
ADDW9 
AD0W1C 

Aoown 

A0DW12 
AD0U13 
ftOOW'H 

ADGUiS 



F02 
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::f€ri. TYPE.BLKIl 
MEN. TYPE BYtE — (HIGH Bf'TE . 
9X MSEC C0RE=X1 
300 NSEC BIP0LAR=002 
500 NSEC n0S=0Q3 
;;HIGH ADDRESS .BLKll 
HEH.LAST ftOQR.s3 BYTES. T HIS WORD AfC *Z'A 1* hB-.'E 
HIGH AD0RESS.H.S. BYTE 
MEN. TYPE, BLK 12 
HEN. LAST A00RESS,BLKi2 
HIGH AOORESS.H.S.BYTE 
NEH. TYPE, BLK 13 
HEN. LAST A00R£SS,BLKi3 
HIGH AOORESS.H.S.BYTE 
HEN. TYPE, SCkW 
HEN. LAST ADDRESS. BLK •*< 
INTERRUPT VECTOR I jL, BUS PRIORUYil 
INTERRUPT VECT(«l2BUS PRI0RITY§2 
BASE ADDRESS OF EQUIPMENT UNOER TES T 
DEVICE MAP 

CONTROLLER DESCRIPTION WORDll 
CONTROLLER DESCRIPTION W0RDl2 
DEVICE DESCRIPTOR WORDlO 
DEVICE DESCRIPTOR WORDll 
DEVICE DESCRIPTOR W0R0i2 
DEVICE DCSCRIPTOR W0R0t3 
DEVICE DESCRIPTOR WORDiH 
DEVICE DESCRIPTOR WOROtS 
DEVICE DESCRIPTOR WORDtfe 
DEVICE DESCRIPTOR W0«0i7 
DEVICE DESCRIPTOR WORDtS 
DEVICE DESCRIPTOR WCR0t9 
DEVICE DESCRIPTOR WORDUO 
DEVICE DESCRIP T OR WORDll 1 
DEVICE DESCRIPTOR W0R0U2 
DEVICE DESCRIPTOR W0R0H3 
DEVICE DESCRIPTOR WOROtlH 
DEVICE DESCRIPTOR JCRDtlS 



G02 



iaindec-ii-dtpb-a pd^ :: 

943 
94*4 
945 
9% 

?!b 

949 
950 
951 
952 
953 
954 
955 
956 
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ERROR POINTER TABLE 

.5BTTL ERROR POINTER TABLE 

♦THIS TABLE CONTAINS THE INFORMATION FOR EACH ERROR THAT CAfi 3CCJ*. 
•THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

»N0TE2: EACH ITEM IN THE TABLE CONTAINS 4 POINTERS EXPLAINED AS *:_;u= 

* EH ;; POINTS TO THE ERROR MESSAGE 

* DH :; POINTS TO THE DATA HEADER 

# DT ;: POINTS TO THE DATA 

♦ DF ;; POINTS TO THE DATA FORMAT 



QC7 

Tj ' 


Of) 1 aqp 








SERRTB: 






TDD 
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UORD 
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wO 
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TOD 
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JwOCIC 
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UORD 
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001500 
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3 
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0401M3 
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UORD 


EM5,DH5,DT5.DF5 


q-yp 
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07001? 
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• TTFH 
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EH6.DH6.DT6.DF6 


974 


001512 


ounpec 




070540 






.UORD 


975 


001520 


070012 












976 










; ITEM 


7 






977 


001522 


040372 


066216 


070540 






.UORD 


EM7.DH7,DT7,DF7 


97e 


001530 


070C12 












979 










; ITEM 


10 




EM10,DHl0,DTi0,DF10 


990 


001532 


040477 


066216 


070540 






.UORD 


981 


X154C 


070012 












982 










; ITEM 


11 




EMll.DHIl.DTll.DFll 


983 


001542 


040604 


066216 


070540 






.UORD 


984 


001550 


070012 
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; ITEM 
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EMl2.DH12,DT12,DFlc 


986 


001552 


040713 


066216 


070540 






.UORD 


987 


001560 


070012 












988 










; ITEM 


13 




EH13.DH13.DT13.DF13 


989 


00157? 


041022 


066216 


070540 






.UORD 


99C 


070012 












991 










: ITEM 


14 




EM14 r DH14.DT14,DF14 


=392 


001572 


04113c 


0662 16 


070540 






.UORD 


993 


X160G 


070012 












994 










; ITEM 


15 




EM15,DH15,DT15,DF15 


995 


2C1602 


041250 


066216 


070540 






.UORD 
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001610 


070012 
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16 




EM16.DH16.DT16.DF16 
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241362 


066216 
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999 

1X0 

:x± 



CC162C 37X12 



1X4 
1005 
100b 
iX7 

icoe 

1009 

1010 
iOii 
1012 
1013 

:q:m 

1015 
1016 
1017 
1016 
1019 
1020 
1021 
1022 
1023 
102M 
1025 
1026 
1027 
1028 
1029 
1030 
1031 
1032 
1033 
1034 
1035 
1036 
1037 
1038 
1039 
10H0 
1041 
1042 
1043 
1044 
1045 
10% 
1047 
10M8 
1049 
1050 
1051 
1052 
1053 
1354 



X1622 
0016X 

001632 
X1640 

X1642 
X1650 

X1652 
X1660 

X1662 
X1670 

G01672 
X17X 

XI 702 
X1710 

X1712 
XI 720 

XI 722 
X17X 

X1732 
XI 740 

XI 742 
X1750 

X1752 
X1760 

X1762 
X1770 

X1772 
X20X 

X2002 
002010 

002012 
002020 

X2022 
0020X 

002032 
002040 



041457 
070042 

041534 
0700S1 

041566 
070051 

041620 
070051 

041701 
070061 

041756 
070061 

042054 
07X61 

042141 
070061 

042054 
070061 

042237 
070061 

042311 
070061 

041724 
070061 

042356 
070 IX 

042401 
070105 

042433 
070105 

042506 
0701 X 

042554 
070061 

042577 
070061 



366347 
366216 
066422 
066511 
366216 
06621b 
X6216 
066216 
066216 
066216 
06621b 
066216 
066216 
066216 
066216 
066216 
066216 
066216 



270624 
070644 
37X66 
070710 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 



ITEM i: 



.WORD EM17,DH17.DT17,DF17 



I TEH 20 



,WORD EH20.DH20.DT20.DF20 



ITEfl 21 



WORD EH21.DH21.DT21.DF21 



I TEH 22 



I TEH 23 



.WORD EH22,DH22,DT22,DF22 
.WORD EH23.DH23.DT23.DF23 



I TEH 24 



I TEH 25 



ITEH 26 



I TEH 27 



ITEH 30 



ITEH 31 



ITEH 32 



ITEH 33 



ITEH 34 



WORD EH24.DH24.DT24.DF24 

WORD EH25.DH25.DT25,DF25 

.WORD EH26,DH26,DT26,DF26 

.WORD EH27,DH27,DT27,DF27 

.WORD EHX,DH30,DT30,DFX 

.WORD EH3l,DH31,DT31,0f3i 

.WORD EH32,DH32,DT32,DF32 

.WORO EH33,DH33,DT33.DF33 

.WORD EH34,DH34,DT34,DF34 



ITEH 35 



ITEH 36 



ITEH 37 



ITEH 40 



.WORD EH35,DH35,DT35,DF35 

.WORD EH36,DH36,DT36,DF36 

.WORD EH37,DH37,DT37,DF37 

.WORD EH40,DH40.DT40,DF40 



ITEH 41 
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UDOblD 


0710?4 


1101 


002240 


070201 






1102 










1103 


002242 


052035 


0bb21b 


071054 


110M 


002250 


070201 






1105 










110b 


002252 


052231 


0bb21b 


071054 


1107 


0022SO 


070201 






1108 










1109 


0022S2 


^52425 


0bb21b 


071054 
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002270 
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ITEM 42 



I TEH 43 



I TEN 44 



I TEH 45 



I teh 4b 



ITEM 47 



ITEM 50 



ITEM 51 



I TEH 52 



I TEH 53 



I TEH 54 



I TEH 55 



I TEH 5b 



I TEH 57 



I TEH bO 



ITEH bl 



I TEH b2 



.UORO EH41,DH41,DT41.DF41 

U0R0 EH42,DH42,DT42,Df42 

UORO EH43,0H43,0T43,0F43 

.UORO EH44,0H44,DT44 t 0F44 

.UORO EH45,0H45,DT45,DF45 

.UCRD EH4b.DH%,0T4b,DF4b 

.U0R0 EH47,DHS7 f DT47,0f47 

.U0R0 EH50,DHSO,OT50,DF50 

UORO EHS1,DH51,DT51,DF51 

UORO EH52.0H52,DT52,DF52 

.UORO EH53,DH53,0T53,DF53 

UORO EH54,DH54,DT54,DF54 

UORO EH55,0HS5,DT5S,DF55 

.UORO EH5b,DH5b,0T5b.DF5b 

UORO EHS7 f DH57,0T57,DF57 

.UORO EHbO , DHbO , DTbO . DFbO 

.UORO EHb 1 , DHb 1 , DTb 1 . OFb 1 

.UORO EHb2 , DHb2 . DTb2 , DFb2 



ITEH b3 



UORD EHb3 , DHb3 . DTb3 , DFb3 
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1111 
1112 
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1118 
1119 
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1121 



1124 
1125 
112fc 
1127 
1128 
1129 
1130 
1131 
1132 
1133 
1134 
1135 
113b 
1137 
1138 
1139 
1140 
1141 
1142 
1143 
1144 
1145 
1146 
1147 
1148 
1149 
1150 
1151 
1152 
1153 
1154 
1155 
1156 
1157 
.158 
1159 
llfaO 
1161 
1162 
1163 
1164 
1165 
1166 



002272 
002300 

002302 
002310 

002312 
002320 

002322 
002330 

002332 
002340 

002342 
002350 

002352 
002360 

002362 
002370 

002372 
002400 

002402 
002410 

002412 
002420 

002422 
002430 

002432 
002440 

002442 
002450 

002452 
C02460 

002462 
002470 

002472 
002500 

0C25O2 
002510 



052536 
070201 

052655 
070201 

052770 
070201 

053037 
070201 

053122 
070233 

053153 
070233 

053203 
070233 

053203 
070233 

05323S 
070233 

053344 
070233 

053435 
070233 

053525 
070233 

053635 
070233 

053720 
07C233 

054114 
070233 

054310 
070233 

054422 
070233 

054567 
070233 



002S12 054676 



266216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 



071354 
071054 
071054 
0710S4 
071054 
071054 
071054 
071054 
071054 
071054 
071054 
071054 
071054 
0710S4 
071054 
071054 
071054 
071054 
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ITEM 64 



UORD EH64,0H64.0T64,0F64 
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ITEM 70 



ITEM 71 



ITEM 72 



ITEM 73 



ITEM 74 



ITEM 75 



ITEM 76 



ITEM 77 



UORD EM65 , DH65 . DT65 . DF65 

.UORD EN66,DH66,DT66,DF66 

UORD EM67,DH67,DT67,DF67 

.UORD EM70,DH70,DT70,DF70 

.UORO EM71,DH71,DT71.DF71 

.UORO EM72,DH72.DT72,DF72 

.UORD EM73,DH73,DT73,DF73 

UORO EM74,DH74,DT74,DF74 

UORO EM7S,DH75,DT75,DF75 

.UORO EM76,0H76,0T76,DF76 

.UORO EH77,DH77,DT77,DF77 



ITEM 100 

.UORD EHIOO.DHIOQ.DTIOO.DFIOO 



ITEM 101 



ITEM 102 



UORD EH101,DH101,DT101,DF101 
UORO EM102,DH102,DT102,DF102 



ITEM 103 

.UORD EM103,DH103,DT103,DF103 

ITEM 104 

.UORD EM104.DH104,DT104,DF1D4 



ITEM 105 



ITEM 106 



UORD EM105,DH105,DT105,DF105 
UORD EM106.0H106,0T106,0F106 
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044006 


1178 
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070131 
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1200 
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1204 
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045144 
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002672 


045222 
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002700 


070105 
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002702 


045301 


1212 


002710 


070105 


1213 






121M 


002712 


045357 


1215 


002720 


070105 


1216 






1217 


002722 


045436 


1218 


002730 


070155 


1219 






1220 


00273? 


045514 


1221 


002740 


070155 


1222 







066216 
066216 
066216 
066216 
366216 
066216 
066557 
066557 
066557 
066557 
066557 
066557 
066216 
066216 
066216 
066216 
066557 
066557 



271054 
071054 
070726 
070726 
070726 
070726 
071000 
071000 
071000 
071000 
071000 
071000 
070726 
070726 
070726 
070726 
071000 
071000 



ITEM 107 

.WORD 

ITEM 110 

.WORD 



ITEM 111 



WORD 



ITEM 112 



.WORD 



ITEM 113 



.WORD 



ITEM 114 



.WORD 



ITEM 115 



.WORD 



ITEM 116 



.WORD 



ITEM 117 



.WORD 



ITEM 120 

.WORD 

ITEM 121 _ 
.WORD 

ITEM 122 

.WORD 

ITEM 123 

.WORD 

ITEM 124 

.WORD 



ITEM 125 



.WORD 



ITEM 126 

.WORD 

ITEM 127 

.WORD 

ITEM 130 

.WORD 

ITEM 131 



em1c7.dh107,dt107.df107 
em:io,dhiio,dtiio,dfiio 

EMlll.DHlll.DTlll.DFlll 
EM112 t DH112,DTll2,DF112 
EM113,DH113,DT113,DF113 
EM114,DHU4,DT114,DF114 
EMUS, DHU5,DT115,Df 115 
EM116,DH116,DT116,DF116 
EM117,DH117,DT117,DF117 
EM120,DH120,DT120,DF120 
EM121,DH121,DT121,DF121 
EH122,DH122,DT122,DF122 
EH123,DH123,DT123,DF123 
EM124,DHl24,DT124 f DF124 
EM125,DH125,DT125,DF125 
EM126,DH126,DT126.DF126 
EM127,DH127,DT127,DF127 
EH130,DH130,DT130,DF130 
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1223 
1224 
122S 
122b 
1227 
1226 
122<< 
1230 
1231 
1232 
1233 
123M 
1235 
123b 
1237 
1238 
123S 
1240 
1241 
1242 
1243 
1244 
1245 
12% 
1247 
1248 
1249 
1250 
1251 
12S2 
1253 
1254 
12S5 
125b 
12S7 
1258 
12S<3 
12b0 
1261 
1262 
1263 
1264 
1265 
1266 
1267 
1268 
126<3 
1270 
1271 
1272 
1273 
1274 
1275 
1276 
1277 
127e 



002742 
002750 

002752 
0027b0 

3027b2 
00277C 

X2772 
003000 

003002 
003010 

003012 
003020 

003022 
00X30 

003032 
003040 

003042 
003050 

003052 
003060 

003062 
003070 

003072 
003100 

003102 
003110 

003112 
003120 

003122 
003130 

003132 
003140 

003142 
003150 

003152 
003160 

003162 
003170 



045573 
070155 

045731 
070105 

046067 
070155 

0Hb225 
070155 

04b3b2 
070105 

04b517 
070155 

04bb54 
070131 

04b742 
070131 

043731 
070131 

04400b 

070131 

047031 
070131 

047107 
070131 

0471bb 
0700b 1 

047333 
0700b 1 

047500 
070061 

047b44 
0700b 1 

050010 
070155 

05007b 
070155 

045144 
070155 



0bb557 
0bb21& 
ObbSS: 
0bbSS7 
0bb21b 
0bbSS7 
0bbSS7 
ObbSS? 
0bb557 
0bb557 
0bb557 
0Gb557 
0bb21b 
0bb21b 
066216 
066216 
066557 
066557 
066557 



O'lOOO 
070726 
071000 
071000 
07072b 
071000 
071000 
071000 
071000 
0710C0 
071000 
071000 
07072b 
07072b 
07072b 
07072b 
071000 
071000 
071000 
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.UORO 


EM131,DH131,DT131,DF131 


; ITEM 


132 
.UORO 


EM132,0H132.DT132,DF132 


; ITEM 


133 
.UORO 


EM133,0H133,DT133,DF133 


: ITEM 


134 
.UORO 


EM134,DH134,DT134,DF134 


; ITEM 


135 
.UORO 


EM135,0H135,DT135,DF135 


; ITEM 


13b 
.UORO 


EM13b,DH13b,DT13b,DF13b 


; ITEM 


137 
.UORO 


EM137 t DH137,DT137,DF137 


; ITEM 


140 
.UORO 


EM140,DH140,DT140,DF140 


; ITEM 


141 
.UORO 


EH141,DH141,DT141,DF141 


; ITEM 


142 
.UORO 


EM142,0H142,DT142,DF142 


; ITEM 


143 
.UORO 


EM143,DH143,DT143.DF143 


; ITEM 


144 
.UORO 


EH144,DH144,DT144,DF144 


; ITEM 


145 
.UORO 


EH14S,DH145,DT14S,DF14S 


; ITEM 


14b 
.UORO 


EM14b,0H14b,0Tl%,DF14b 


;ITEM 


147 
.UORO 


EM147,DH147,0T147,DF147 


; ITEM 


150 
.UORO 


EM1SO,DH150,DT150,DF150 


; ITEM 


151 

UORO 


EM151 DH1S1 DT151.DF151 


; ITEM 


152 
.UORO 


EM152,0H152,DT152,DF152 


; ITEM 


152 
.UORO 


EM153,DH153,DT152.DF153 
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1278 
1280 
1281 

1284 
1285 
128b 
1287 
1288 
1288 
1280 
1281 
1282 
1283 
1284 
1285 
12% 
1287 
1288 
1288 
1300 
1301 
1302 
1303 
1304 

1305 
130b 
1307 
1308 
1208 
1310 
1311 
1312 
1313 
1314 
1315 
131b 
1317 
1318 
1319 
1320 
1321 
1322 
1323 
1324 
1325 
132b 
1327 
1328 
1328 
1330 
1331 
1332 
1333 
1334 



003172 
003200 

003202 
003210 

003212 
003220 

003222 
003230 

003232 
003240 

003242 
003250 

003252 
003250 

0032b2 
003270 

003272 
003300 

003302 
003310 

003312 
003320 

003322 
003330 

003332 
003340 

003342 
003350 

003352 
0033b0 

0033b2 
003370 

003372 
003400 

003402 
003410 



045222 
070155 

050155 
070155 

050243 
070155 

050322 
070105 

050467 
070155 

050b25 
070105 

050772 
070105 

05113b 
070155 

051273 
070105 

055224 
070255 

055310 
070255 

055373 
070255 

055425 
070255 

055513 
070255 

05553b 
070255 

055723 
070265 

055071 
070255 

055237 
070255 



003412 055351 



05fcS57 
0bbS57 
058557 
0bb21b 
055557 
0bb21b 
05521b 
055557 
055215 
055557 
055557 
056557 
056557 
056557 
065557 
066557 
066557 
066557 
065557 



071000 
071000 
071000 
070725 
071000 
070725 
070725 
071000 
070725 
071142 
071142 
071142 
071142 
071142 
071142 
071142 
071142 
071142 
071 142 



ITEM 154 

.WORD EM1S4,DH1S4,DT1S4,DF1S4 



ITEM 155 



ITEM 155 



ITEM 157 



ITEM 150 



WORD EMISS.DHISS.DTISS.DFISS 

UORO EMlS6,DH156,DTlS6 f DF156 

WORD EN157,0H157,DT157,DF157 

UORO EM160,DH160,DT150,DF160 



ITEM 161 

.UORO EH161,DH151,DT161,DF161 

ITEM 162 

.UORO EH162,DH162,DT162,DF162 

ITEM 163 

.UORO EH163,DH163,0T163,DF153 



ITEM 154 



ITEM 155 



.UORO EM164,0H164,DT164,DF154 
UORO EM165,DH165 f 0T165,0F165 



ITEM 166 

.UORO EM156,DH166,DT155,DF165 

ITEM 157 

.UORO EM167,DH167,DT167.DF157 

ITEM 170 

.UORO EM170,DH170,DT170,DF170 

ITE " 1? !u0R0 EM171,DH171,DT171,QF171 
ITEM 172 



ITEM 173 



.UORO EM172,0H172,DT17£,0F172 
UORO EH173,0H173,0T173,DF173 



ITEM 174 

.UORO EM174,0H174,0T174,DF174 

ITE " 17 ^U0RD EM175 f DH175,DT175,DF175 



ITEM 176 



UORD EM176,DH176,DT176,DF175 



^lNOeC-11-OfrPB-fl PDF 11 

D-TPBA.Pi: 01-N0V-76 21:06 
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ERROR POINTER TABLE 



1335 


C03420 


073317 






1336 










i 1337 


003422 


056435 


066557 


071142 


1338 


003430 


070317 






1 1339 










13*40 


003432 


056520 


066557 


071142 


1341 


003440 


070317 






1342 
1343 


003442 


056552 


066557 


071142 


1344 


003450 


070317 






1345 










13% 


003452 


056641 


066557 


071142 


1347 


003460 


070317 






1348 










1349 


003462 


057003 


066557 


071142 


1350 


003470 


070317 






13S1 








071142 


13S2 


003472 


057145 


066557 


1353 


003500 


070317 






1354 










13S5 


003502 


057233 


066557 


071142 


135b 


003510 


070317 






1357 










1358 


003512 


0S74C1 


066557 


071142 


1359 


003520 


070317 






1360 










1361 


003522 


057547 


066716 


071252 


1362 


003530 


070361 






1363 










1364 


003532 


057611 


067006 


071230 


1365 


003540 


070351 






1366 










1367 


003S42 


057653 


067006 


071252 


1368 


003550 


070361 






1369 










1370 


003552 


060017 


066716 


071324 


1371 


003560 


070405 






1372 










1373 


003562 


060203 


066716 


071324 


1374 


003570 


070405 






1375 










1376 


003572 


060367 


066716 


071324 


1377 


003600 


070405 






1378 










1379 




060553 


066716 


071324 


1380 


003610 


070405 






1381 










1382 


003612 


060737 


067006 


071252 


1383 


003620 


070361 






1384 










1385 


0036?? 


061121 


067047 


071406 


1386 


003630 


070435 






1387 










1388 


003632 


061163 


066656 


071252 


1389 


003640 


070361 






i39C 











ITEM 177 

.WORO 



ITEM 200 



WORD 



ITEM 201 



.UORD 



ITEM 202 



, WORD 



ITEM 203 



.WORD 



ITEM 204 



.WORD 



ITEM 205 

.WORD 

ITEM 206 

.WORD 



ITEM 207 



.WORD 



ITEM 210 



.WORD 



ITEM 211 



.WORD 



HEM 212 

.WORD 

ITEM 213 

.WORD 

ITEM 214 

.WORD 

ITEM 215 

.WORD 



ITEM 216 



.WORD 



ITEM 217 

.WORD 

ITEM 220 

.WORD 

ITEM 221 



EM177,DH177 
EM200.DH200 
EM201.DH201 
EM202.DH202 
EM203.DH203 
EM204.0H204 
EM205.DH205 
EM206,DH206 
EM2C7.DH207 
EM210.DH210 
EM211,DH211 
EM212.DH212 
EM213,DH213 
EH2H,DH214 
EH215.DH215 
EM216,DH216 
EM217.DH217 
EM220.DH220 



, DT 177, DF1 77 
,DT200,DF200 
,DT201,DF201 
,DT202,DF202 
.DT203.DF203 
,0r2O4,DF204 
,DT205,DF20S 
.DT206.DF206 
,DT207,Df207 
,DT210,DF2I0 
,DT211,DF21I 
,DT212,DF212 
,DT213,DF213 
,DT214,DF214 
,DT215,DF215 
,DT216,DF2lb 
,DT217,DF217 
.DT220.DF220 



•tNlJCEC-ll-OFPPB-A pop :: 
DPHW.Pli Ol-fCV-rb 21:06 



34 FPP DIAGNOSTIC PAR T 
ERROR POINTER 





wwJO'C 




13S2 




J' JJOl 


' w 
• j*j 






•xn 


uujbac 


nt.ic.c7 




JUJPCU 


w< UOC1 












Dtp i tri 


' TOO. 


UUJC. l~ 


U' JJCi 






' 4TP 


TT"*«7? 


UPC J3J 


• i 


UUJ' uu 


n703fcl 
U' UJJD1 


• ~JC 






!4m 




UDCOUO 


'404 


003710 

UUJ' 1L 


0703*. 1 








' 40f. 
*^uo 


UUJ' 1C 




1407 


0C37P0 
UU3' cu 


0704OC. 

U' LTTuP 


1 40fi 










UDJCUO 




UUJ' JU 










imp 


111773? 


ncp>4 1 




003740 

UUJr iU 




' JIU 






I U1C 


OP 774? 


0tv347C 
JOJ»' 3 




0037^0 
UUJ 3U 


Q7040C 

U' u»U3 


1417 






1418 


0077^? 


nc7c. 1 1 

U3' Oil 


miq 


nn37wi 




1~CU 






14? 1 


00375*? 
UUJ' oc 


0f»3fi3l 

UDJOJl 


14?? 


UU J* ' w 


070444 

U' U T 1 I 






0A3fi70 

UDJD' U 


1 4?M 
' u pc 

* 'S3 


00377? 

UUJ' ' c 




0704M 

U' JlDi 


i ape. 






!4?7 


00400? 


0fc37CU 

UOJ' «7~ 


* 'CO 


WW <UiU 


07047T 










004 n '? 


UP 'Uc c 


A 'J A 




070461 


mi? 








0040?? 

yv«UtX 






004030 


0704M 


'4% 






14% 


00403? 

UVTW JC 


0f>4141 
UQ • lil 


1437 


004040 

WW «w ■ w 


0704fel 






1439 

A 'J 4 


004042 

WW ■ W*b 


UP~1 « 3 


14H0 


004050 


070444 


1441 






1442 


004052 


064300 


1443 


004060 


070%1 


1444 






1445 


004062 


064334 


144fc 


0OH070 


070444 



067006 

066656 

067006 

066656 

067006 

067123 

067211 

067122 

067211 

067211 

067300 

0673M1 

067427 

067467 

067341 

0675S5 

067300 

067555 

067300 



C'1252 
C7I2S2 
071252 
371252 
071252 
071324 
071324 
071324 
071230 
071252 
071426 
071462 
071502 
071462 
071462 
071462 
071426 
071462 
071426 



B03 

( 1006 ) 

.WORD EH22l.DH221.DT221.Df 221 



2 HACYil 27(1006) 01-N0V-76 21:12 PAGE 27 
TABLE 



I TEH 222 

.WORD 

I TEH 223 

.UORD 

I TEH 224 

.UORD 



I TEH 225 



.UORD 



ITEH 226 



.UORD 



ITEH 227 

.UORD 

ITEH 230 

.UORD 



ITEH 231 



.UORD 



ITEH 232 



.UORD 



ITEH 233 



.UORD 



ITEH 23M 



.UORD 



ITEH 235 



.UORD 



ITEH 236 



.UORD 



ITEH 237 



.UORD 



ITEH 240 

.UORD 

ITEH 241 

.UORD 

ITEH 242 

.UORD 

ITEH 243 

.UORD 



EH222.DH222.DT222.DF222 
EH223,DH223.DT223.0F223 
EH224 , DH224 , DT224 . DF224 
EH225,DH225,DT22S,DF225 
EH226 , DH226 , DT226 , DF226 
EH227 . DH227 , DT227 , DF227 
EH230, DH230, 0T23O, DF23C 
EH231.DH231,DT231,DF231 
EH232, 0H232, DT232. Df 232 
EH233 , DH233, DT233 . Df 233 
EH234 , DH23M , DT23M, Of 234 
EH23S , DH235, DT23S, DF235 
EH236 , 0H236, 0T236 . 0F236 
EH237,DH237,DT237,0F237 
EH240 , DH240, 0T240, Df 240 
EH241 , 0H2M1 , DT2M1 , DF2M1 
EH242, DH2M2, 0T2S2, DF242 
EH243 , DH243 , DT243 , Df 243 



C03 



taindec-h-dffpb-a pdp :: 

D"T>8A.Pli Cl-IGV-Tfc 21:06 



34 FPP DIAGNOSTIC PART 
ERROR POINTER 



2 HACY11 27(1006) 01-N0V-76 21:12 PAGE 28 
TABLE 



1447 

1449 

145C 

1451 

1452 
1453 

1454 
1455 



1458 
1459 
1460 

1%1 

1462 
1463 
1464 
1465 
1466 
1%7 
1468 
1469 
1470 
1471 
1472 

1473 
1474 
1475 
1476 
1477 
1478 
1479 
1480 
1481 
1482 
1483 
148M 
1485 
148b 
1487 
1488 

* 

1490 
1491 
1492 
1493 
1494 
1495 
14% 
1497 
1498 
1499 
1500 
15C1 
1502 



004072 
X4100 

004102 
004110 

004112 
004120 

004122 
0G413C 

00413* 
004140 

004142 
004150 

004152 
004160 

004162 
004170 

004172 
004200 

004202 
004210 

004212 
004220 

004222 
004230 

004232 
004240 

004242 
004250 

004252 
004260 

004262 
004270 

004272 
004300 

004302 
304310 



6^0444 

064*76 
070444 

043341 
070105 

064560 
070474 

064614 
07Q474 

064646 
070474 

064701 
070502 

064772 
070506 

065056 
070506 

06E143 
070506 

065231 
070506 

065320 
070506 

065406 
070506 

065475 
070506 

065565 
070506 

065656 
070506 

065743 

071 ~ 



0506 



066030 
070506 



004312 066115 



067300 
067300 
066216 
067645 
067712 
067712 
066306 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
067752 



071426 
071426 
070726 
071514 
071532 
071532 
071544 
071556 
071556 
071556 
C71556 
071556 
071556 
071556 
071556 
071556 
071556 
071556 
071544 



ITEM 244 

.WORD 

I TEN 245 

.WORD 

I TEN 246 

• WORD 

.WORD 



ITEM 250 



.WORD 



ITEM 251 

.UORO 

I TEN 252 

.UORO 

ITEH 253 

.UORO 

I TEN 254 

.UORO 



ITEH 255 



.UORO 



ITEH 256 



.UORO 



ITEH 257 



ITEH 260 



.UORO 



ITEH 261 



.UORO 



ITEH 262 

.UORO 

ITEH 263 

.UORO 



ITEH 264 



ITEH 265 

.UORO 



EH244 , DH244 , DT244 , DF244 
EH24S . DH245 . 0T245 . DF245 
EH246 , 0H246, DT246 , DF246 
EH247 , 0H247 , DT247 , DF247 
EH2S0 , DH250, DT250 , DF250 
EH251,DH251,0T251,DF251 
EN252,DH252,DT252,0F252 
EN253 . DH253, DT253 , DF253 
EN254 , DH2S4 , DT254 , DF254 
EN25S , DH255 . DT2S5 . DF2S5 
EN256, 0H256, DT2S6, DF256 



UORO EN2S7 1 DH2S7,0T257,DF257 



EH260 , 0H260, DT260 , DF260 
EN261.0H261,DT261,DF261 
EN262 , 0H262 , DT262 , DF262 
EH263 , 0H263 , DT263 , DF263 



UORO EN264,0H2b4,DT2b4,DF264 



EN265 , DH265, DT265 , DF265 



ITEH 266 



UORO EH26b.0H266.DT266,DF2bb 



D03 



ifli»c€C-i:-y r P9-a pcf 

OFTPBfi.pn Q:-NC\-7fe 21:0b 



1503 
1504 

1506 
ISO* 

1510 
1511 
1512 
1513 
1514 
1515 
151b 
1517 
1519 
1519 
1520 
1521 
1522 
1523 
1524 
1525 
152b 
1527 
1526 
:S2* 
1530 
.531 
1532 
1533 
1534 
1535 
153b 
1537 
1538 
1539 
1540 
1541 
1542 
1543 
1544 
1545 
15% 
1547 
1546 
1549 
1550 
1551 
1552 
1553 
1554 
1555 
155b 
1557 
.556 



0C432C :70502 



004322 
0000% 
0000% D333b2 



000052 



004322 
004322 
004324 
00432b 
004330 
004332 
004334 



00433b 



00433b 
004342 
004344 
004350 
004352 

00435b 
0043b4 
004372 
004400 
00440b 
004414 
004422 
004430 
00443b 



004322 



004322 

X0024 
000024 000200 

OCOOHH 
000044 004322 

004322 



000000 
00131b 
000010 
00004C 
000000 
000052 



01270b 
00502b 
02270b 
X1374 
01270b 

012737 
012737 
012737 
012737 
012737 
012737 
012737 
012737 
01b7b7 
0050b7 



34 FPP DIAGNOSTIC PART 2 HACYll 27(l00b) 
ERROR POINTER TABLE 



, SflTTL ACT 11 HOOKS 



01-N0V-7b 21:12 PACE 29 



0C11C0 

001140 

001100 

033442 
000340 
033722 
000340 
035b70 
000340 
035754 
000340 
02b542 
I74fc32 



000020 
000022 
000030 
000032 
000034 
00003b 
00X24 
00002b 
02b532 



; HOOKS REQUIRED BY ACT 11 
SSVPC=. 
.=% 
SENOAO 



.S8TTL 



.sSSVPC 

APT PARAMETER BLOCK 



;SAVE PC 

;;DSET LOC.% TO AOORESS Of SEND AC IN SE^ 

;;2)SET LOCK TO ZERO 
; ; RESTORE PC 



••######*§#*#####»######*#*#*#####*««*********♦***********♦♦♦*♦** 

;SET LOCATIONS 24 AND 44 AS REQUIRED FOR APT 

2X ; FOR APT START UP 

.=44 ; POINT TO APT INDIRECT AOORESS PNTR. 

SAPTHDR POINT TO APT HEAOER BLOCK 

. = .SX ; :RES£T LOCATION COUNTER 

SETUP APT PARAMETER BLOCK AS DEFINED IN THE APT-PDPll DIAGNOSTIC 
INTERFACE SPEC. 



SAPTHO: 

SHIBTS: 

SMBAOR: 

STSTM: 

SPASTM: 

SUNITN: 



START: 
.SBTTL 



.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 



0 

SNAIL 

10 
40 
0 



;TWO HIGH BITS OF IB BIT MAILBOX AOOR. 
;A00RESS OF APT MAILBOX (BITS 0-15) 
RUN TIN OF LONGEST TEST _ 
RUN TIME IN SECS. OF 1ST PASS ON 1 UNIT (QUICK VERIFY 5 
ADDITIONAL RUN TIME (SECS) OF A PASS FOR EACH ADDITIONAL UNI 



SETEND-SNAIL'2 ; ; LENGTH NAlLBOX-ETABLEi WORDS) 



INITIALIZE THE COMMON TAGS 



i; CLEAR THE COMMON TAGS ( SCNTAG ) AREA 



NOV tSCNTAG.Rb 

CLR (RbH 

CMP ■SMR.Rb ;;DONE' 

BNE .-b 

NOV tSTACK^SP 



;; INITIALIZE A FEW VECTORS 

NOV " 

MOV 



: ;FIRST LOCATION TO BE CLEARED 
; ) CLEAR MEMORY LOCATION 

:;L0OP BACK IF NC 

!| SETUP THE STACK POINTER 



MOV 
MOV 
MOV 
HOV 
MOV 
MOV 
MOV 
CLR 



■SSCOPE.ailOTVEC ;:IOT VECTOR FOR SCOPE ROUTINE 
•340.3110TVEC+2 ;; LEVEL 7 

iSERROR. StEMTVEC ; : EMT VECTOR FOR ERROR ROU T INE 
•340.attMTVEC+2 ;; LEVEL 7 

tSTRAP. 3ITRAPVEC I : TRHP VECTOR FOR TRAP CALLS 
•340.a4TRAPVEC+2;LEVEL 7 



•SPWRON.atPWRVEC 
•340.31PWRVEC+2 
SCNDtT.SE^PCT 
STIMCS 



; POWER FAILURE VECTOR 
LEVEL 7 

SETUP END-OF -PROGRAM COUNTER 
INITIALIZE NUMBER OF ITERATIONS 



E03 



-v£. ..-^PS-h POP 11 

°8h e :. c;-N0\-7fc 2i:06 



34 FPP DIAGNOSTIC PART 2 HACYll 27(100fc) 
INITIALIZE THE COMMON TAGS 



01-N0V-76 21:12 PAGE 2Z 



Bis?? 8ii7b7 W¥ 



566 004504 
12 
14 

569 004520 

57C 0045 

571 0045 

572 004532 

573 004536 

574 00454M 

575 004550 

576 004556 
577 

578 

579 004564 

582 004504 

583 0C%12 

584 004620 
585 

586 004622 

587 004624 

588 004630 
58*3 004632 

590 004640 

591 00%% 
592 

593 00%52 

594 00%56 

595 004664 

596 004666 

597 00%74 
598 

599 

600 00%74 

601 004700 
60c 004702 

603 004710 

604 004712 
605 

606 004716 

607 3D4722 

608 004724 

609 004732 

610 004734 

611 0C4742 

612 004744 

613 0047% 
fcli 004^50 



553 3C44SC 

S6C 304454 
561 
562 

563 304462 

Us B8g m 



012737 
012737 



31 

000006 

012767 
000402 
062706 
012737 
005067 
012767 
012767 



0137% 



) 12767 
012767 
022777 
001012 

000403 
012716 
000002 
012767 
012767 
012637 

005067 
132767 
001403 
012767 



005227 
001055 
022737 
001451 
104401 

005737 
001012 
126727 
001406 
026727 
001005 
104405 
000403 
112767 



174630 
0OC001 

033426 



004532 
00M522 



000010 
000012 
026664 
004550 
004556 



000004 

14 

177570 
1 77570 
177777 



004632 

000176 
000174 
000004 

174446 
000200 

001340 



177777 
033362 
004760 
000042 
174406 
174200 



174433 
000014 
000010 



000006 026876 64$ 



000010 

174330 
174324 



B 

174330 
17432C 



174300 
174274 



174453 
174244 



000042 



000001 
00017b 



CLR 
NOVB 
:; INITIALIZE 
; ; THE "ENO-CF 
NOV 
NOV 
NOV 
NOV 
CLR 
MOV 
RTT 
NOV 
BR 
ADO 
MOV 
CLR 
NOV 
NOV 

;;SIZE FOR A 
.;EOUAL TO A 
NOV 
NOV 
NOV 
NOV 
CMP 
BfC 



SESCAPE ;; CLEAR THE ESCAPE CN ERROR dZ'^lli 

•l.SERHAX :: ALLOW ONE ERROR PER T£S T 

THE -t-BIT- TRAF VECTOR. THEN LOAD LOCA T ION "$P'PT. I' 
-PASS" <$EOP) ROUTINE, WITH A TI" OR "RTT". 



65S: 
6bS: 



•SRTRN.aiTBITVEC 
•65S,aaR£SVEC 

-csp5 

•64$. -(SP) 

»RTT,$RTRN 
66S 

iRESVEC+2,aiRESVEC 
JTBIT 
I. ,SLPAOR 

hardwarVswitch regIs 



;S£T -T" BIT VECTOR TO $PTP* 

TO A RTI 
TRY TO DO A RTT 
DUMMY PS 
AND PC 
TRY THE RTT 

RTT IS LEGAL-SET JRTRN TO A RTT 



RTT ILLEGAL— CLEAN OFF THE STACK 

:: RESTORE TRAP CATCHER 
CLEAR -T- BIT SWITCH 
INITIALIZE THE LOOP ADDRESS FOP SCOPE 
TUP THE ERROR LOOP ADDRESS 
R. IF NOT FOUND OR IT IS 



--1", SETUP FOR A SOFTWARE SWITCH REGISTER 



67$ 
68S 
691 



BR 

MOV 
RTI 
MOV 
MOV 
MOV 

CLR 
BITB 
BEO 
NOV 



atERRVEC A -(SP> 
l67S.atEftRVEC 
iDSWR.SWR 
•00 ISP. DISPLAY 

•-i.aswR 

69$ 
68$ 

•68$, (SP) 



SAVE ERROR VECTOR 
s^tu^fS^hr^dwrre SWICH REGIS'EP 

AND A HARDWARE DISPLAY REGISTER 
TRY TO REFERENCE HARDWARE SWR 
BRANCH IF NO TIMEOUT TRAP OCCURRE; 
AND THE HARDWARE SWR IS NCT = -1 
BRANCH IF NO TIMEOUT 
SET UP FOR TRAP RETURN 



•SWREG^SWR ;; POINT TO SOFTWARE SWR 

•DISPREG.OISPLAY 

(SP)*,a«ERRVEC ;; RESTORE ERROR VECTOR 



{PASS 

•APTSIZE,$ENVM 
70$ 

•$SWREG,SWR 

70$: _ 
.SBTTL TYPE PROGRAM NAME 
:;TYPE THE NAME OF THE PROGRAM 
INC t-1 
BNE 71$ 
CMP •$ENDAD,a«42 
BEQ 71$ 
TYPE .72$ 
.SBTTL GET VALUE FOR SOFTWARE 



000001 174156 73$: 



TST 
BNE 
CMPB 
BEG 
CMP 
BNE 
GTSWR 
BR 

NOVB 



a 142 

73$ 

$ENV,tl 
73$ 

SWR.aSWREG 
74$ 

74$ 

•l.$AUTOB 



;; CLEAR PASS COUNT 

;;TEST USER SIZE UNDER APT 

; YES, USE NON-APT SWITCH 
;;N0,0SE APT SWITCH REGISTER 

IF FIRST PASS 
;FIRST TIME' 
; BRANCH IF NO 
ACT-IP 

•BRANCH IF YES 
,-TYPE ASCIZ STRING 
SWITCH REGISTER 

ARE WE RUNNING UNDER XXDP'ACr 
BRANCH IF YES 
ARE WE RUNNING UNDER APT* 
BRANCH IF YES 

SOFTWARE SWITCH REG SELECTED" 
BRANCH IF NO 
GET SOFT-SWR SETTINGS 

;;SET AUTO-MODE INDICATOR 



F03 



•«ircEC-ii-DFFPe-A pop 

DFFP9A.Pi: 0l-N0\-rfe 21:Cb 



34 FPP DIAGNOSTIC PART 2 NACY1 I 27(1006) 01-N0V-7& 21:12 PASE 
GET VALUE FOR SOFTUARE SWITCH REGIS T ER 



034756 
004756 

0OSC34 

005034 



0C0426 



74$: 

LOOP: 



BR 71$ ::GET OVER THE ASCIZ 

.ASCIZ vCRLF>*DFFPB. FPll-A 11-34 FPP DIAGNOSTIC PAF T r# lf>S 



1634 
1635 
1636 
1637 
1636 
1633 

:&4C 

1641 
lb42 
1643 
1&44 
1645 
lfe% 
1647 

:fc46 

1649 
1650 
1651 
1652 
1653 
1654 
1655 
1656 
1657 
1656 
1659 
1660 
1661 
1662 
1663 
1664 
1665 
1666 
1667 
IfcfeB 



005034 X0004 



005040 
005044 
0050% 
005054 
005060 
005062 
005066 
005070 
005072 
005076 
005100 
005104 
005110 
005112 
005114 
005120 
005124 
005130 
005132 
005134 
005140 
005142 
0051% 
005150 
005152 
005154 



104413 
012704 
170104 
012737 
012700 
172410 
012700 
172010 
170205 
012700 
174010 
012701 
012702 
022021 
001415 
012700 
012701 
012702 
022021 
001402 
000137 
077205 
000137 
077220 
020405 
X1402 
000137 



003200 

005066 CO 1236 
006616 

006626 



006606 

006636 
000004 



006606 
006646 
000004 



005626 
005674 

005742 



*************************************************************** 

* T EST 1 ROUND \ TRUNK 1EST 

* THIS IS A TEST OF THE ROUND N TRUNK 

FLOWS. IN PARTICULAR TWO THINGS ARE TESTED: 
FIRST A CONDITION IN WHICH ROUNDING 
RESULTS IN THE NEED FOR RENORHALIZPTION. AND 
SECOND THE PSW CONDITION COOES N AND 



Z BIT COMBINATIONS 
*************************************************************** 



tSTl: SCOPE 



HH1: 



HH2: 

HH3: 

HH4: 

HH5: 
HH6: 



; ROUND AND NORMALIZE TEST 



LPERR 

NOV t3200,R4 

LDFPS R4 

NOV IHH2.ai$TMP2 

NOV tHHPO.RO 

LDD (RO).ACO 

NOV 1HHP1.R0 

ADOO (RO).ACO 

STFPS RS 

NOV •HHDATO.RO 

STD ACO.(RO) 

NOV •HHP2.R1 

NOV I4.R2 

CMP (RC)MR15* 

BEO HH6 

MOV iHHDATO.RO 

MOV IHHP3.R1 

MOV I4.R2 

CMP (R0)+,(R1)* 

BEQ HH5 
JHP 21HHER0 



:SET UP THE LOOP ON ERROR A0DRES5. 
;S£T FIU. FIV, QfC FD 

;SET ACO OPERAND 
•FSPC 

ITEST INSTRUCTION 

;G£T FPS 

;GET THE RESULT 

;IS IT CORRECT 



DID FLOW GO 
FROM STATE 663 
TO 313 INSTEAO 
OF TO 353 



SOB 
JHP 
SOB 
CMP 
BEQ 
JMP 



R2.HH4 
3SHHER1 
R2.HH3 
R4.R5 
HH7 

3IHHER00 



;FPS CORRECT' 



THIS IS A TEST OF THE ABILITY 

OF NORMALIZE TO PRODUCE A ZERO EXP. AND _ 

CF THE R\T ALGORITHM TO PORPERLY SET THE FPS 



G03 
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DfPP9fi.Pl! Ol-NCv-rb 2i;Zh Tl ROJNCvTRUNK TEST 



I6»7i 
lb72 
lb73 
lb7M 
lb7S 
IbTb 
!b77 

IbTB 

ib7<? 
:bec 
.bfli 

lb8£ 
:b33 
.b8s 
-bBS 
IbBb 

:b87 

lb88 
lb8S 
lb* 
1691 

:b92 
:fc93 

*b9S 

:b% 
:b97 
ib% 

lb99 
17*00 
1701 
1702 
1702 
1704 
1705 
170b 
1707 

i7oe 

1709 
1710 
1711 
1712 
1713 
1714 
1715 
171b 
1717 
1718 
1719 
1720 
1721 
1722 



1 725 
172b 



CCSibC 

oosibo :zw> 

005lb2 Q127«4 



IMj" 



OOSlbb 
005170 
00517b 
00520M 
0OS21C 
005212 
00521b 
00522C 
005222 
00522b 
0OS2X 
005234 
005240 
0052S2 
005244 
005250 
005252 




005270 
005274 
00527b 
0053OM 
005310 
005312 
00531b 
005320 
035322 
00532b 
005330 
005334 
005340 
005342 
005344 

005350 
00S3S4 
0053b0 
005362 

>4 



005372 
00537b 

881585 

00540b 

005-110 



170104 
012737 
012727 
01270C 
172410 
012700 
172010 
170205 
012700 
174010 
012701 
0127Q2 

022021 
001402 
000137 
077205 
052704 

'4n? 



104S13 

012704 
170104 
012737 
012700 
172410 
012700 
172010 
170205 
012700 
174010 
012701 
012702 
022021 
001415 
012700 
012701 
0127O2 
022021 
001402 
000137 
077205 
000137 
077220 
052704 
020405 
001402 
000137 



04320C 



00521b 
00b53b 
OObbbb 

00bb7& 



CObbOb 

OObbSb 
000004 



OObOlO 
100004 

OObOSb 



043200 

00531b 
Q0b71b 

00b72b 



OObbOb 

00b70b 
000004 



OObbOb 
00bb5b 
000004 



00bl24 
00bl72 
100014 

DOb240 



LPERR 

NOV 



30123b 
00C2H4 



MOV 
MOV 
NOV 
LDD 

.10V 

HH9: flODD 
STFPS 
MOV 

STD 
MOV 
MOV 

HH9: CMP 
BEQ 
JMP 

HH10: SOB 
BIS 
CNP 

m 

;THIS IS A TEST 
; ABILITY TO SET 
HH11: 



00123b 



HH12: 



HH13: 



HH14: 

HH15: 
HHlb: 



LPERR 

NOV 

LDFPS 

NOV 

NOV 

LOO 

NOV 

AOOO 

STFPS 

NOV 

STD 

NOV 

NOV 

CNP 

BEQ 

NOV 

NOV 

NOV 

CNP 

BEQ 

JNP 

SOB 

JNP 

SOB 

BIS 

CNP 

BEQ 

JNP 



•043200, R4 

LDFPS R4 
•HHB.3»STNP2 
•HHTR5P.a•FPVEC , 
•HHP5.R0 
(RO).ACO 
•HHPb.RO 
(RO),ACO 
R5 

•HHOATO.RO 
ACO.(RQ) 
•HHP4 , Rl 
•4.R2 

(Ru)+. (Rl )♦ 
HHiO 
3SHHER2 
R2.HH9 
•10OOO4.R4 
R4.R5 
HHll 
SSHHER3 

OF THE R\T ALGORITHM'S 

BOTH N AND Z ON A - 0 RESULT 



;SE" JP "HE LOOP 04 EPPCP ADCPE; 
SET FIU.FIV.A40 FD 
FIO 

IN CASE UNDERFLOU 
TRAP OCCURS 
SET ACO OPERANO 

FSPC 

TEST INSTRUCTION 
GET FPS 

GET THE RESUL* 



IS IT CORRECT 



;FPS CORRECT' 



•043200, R4 
R4 

»HH12,3*STMP2 
•HHPB.RO 

(RO).ACO 
•HHP9.R0 
(RO),ACO 
R5 

•HHOATO.RO 
AC0,(RO5 
•HHP7.R1 
I4.R2 

(R0)*,(R1)+ 
HHlb 

•HHOATO.RO 
•HHP4, Rl 
•4.R2 

(RO)*,(RD* 

HH15 

3»HHER4 

R2.HH14 

9SHHERS 

R2.HH13 

•100014, R4 

R4.R5 

HHl7 

3«HHERb 



;SET UP THE LOOP ON ERROR ADORES 
;SET FIV. FIV, AND FD 



;SET ACO OPERAND 
•FSPC 

•TEST INSTRUCTION 

;GET FPS 

;GET THE RESULT 

;IS IT CORRECT 



;FOS CORRECT" 



J^PK.PU Ci-Njv-76 cl:Cb 



H03 
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Tl ROUNC\TRUNK TEST 



01-N0V-7fe 21:12 PAGE 32 



*- c- 


005414 




005414 


rx 

1731 


005416 

005422 


1732 


005424 


i~33 


005432 




005440 


t TIC 


3CE44S 

0054% 


:~36 


-37 


005452 


.'38 


00545s 




305456 


.-■♦3 


005% 3 


."Hi 


0054fc4 


1-42 


005470 


:~43 


005474 


1744 


005476 


1~45 


005500 




005504 


1747 


005506 


1748 


005512 


1749 


0C5514 


1750 


005516 


1751 




1752 


005522 


.753 


005522 


1754 


005524 


1755 


0055X 


1756 


005532 


1757 


005540 


1758 


005544 


1759 


005546 


!7b0 


005552 


1761 
I7b2 


005554 


005556 


1762 


005562 


1764 


005564 


1765 


005570 


1766 


005574 


1767 


005576 


I7b8 


005600 


1769 


0056CH 


1770 


005606 


1771 


005612 


1772 


005614 


1773 


005616 


ir^M 


005622 


1775 


005626 


1776 


005626 


1777 


005632 


1778 


005636 


1779 


005644 


1780 


005652 


i7ei 


005660 


:7e£ 


005666 



10*413 
012704 
170104 
012737 
012737 
012700 
172410 
012700 
172010 
170205 
012700 
174010 
012701 
012702 
022021 
001402 
00C137 
077205 
052704 
020405 
001402 
000137 



; TEST 

HH17: 



THAT CC ARE CLEARED BY R~ T 



00020C 

005452 
036614 
006716 

006716 



006606 
000004 



006306 
000000 

006354 



001236 
000244 



HHI8: 

HH19: 
HH20: 



:TES' 
HH21: 



LPERR 

MOV 100200,94 

_DFPS R4 

MOV •HHl8.3liTMP2 

MOV •FPSPUR.SlFPVECT 

MOV IHHP8.R0 

LOO (RO).ACO 

MOV IHHP8.R0 

ADDD (RO).ACO 

STFPS R5 

MOV IHHOATO.RO 

STD ACO.(RO) 

MOV tHHPlO.Rl 

MOV I4.R2 

CMP (R0)*,(R1)+ 

8EQ HH20 
JMP 3IHHER7 

SOB R2.HH19 

BIS l060O0.R4 

CMP R4.R5 

BEQ HH21 

JMP StHHER8 

THAT N IS SET BY R\T 



;SET JF THE LOOP ON £P«>CR AODRES 
;SET FU. FIV. AND FD 



104413 








LPERR 


012704 


003200 






MOV 


170104 








LDFPS 


012737 


005552 


001236 




MOV 


012700 


006666 






MOV 


172410 








LDD 
MOV 


012700 


006666 






172010 






HH22: 


AOOO 


170205 








STFPS 


012700 


006606 






MOV 


174010 








STD 


012701 


006746 






MOV 


012702 


000004 






MOV 


022021 






HH23: 


CMP 


001402 








BEQ 


000137 


006422 






JMP 


077205 






HH24: 


SOB 


DS2704 


000010 






BIS 


020405 








CMP 


001402 








BEQ 


000137 


006470 






JMP 


000137 


006756 




HH25: 
HHERO: 


JMP 


010537 


001252 






MOV 


010437 


001254 






MOV 


012737 


006626 


001240 




MOV 


012737 


006616 


001242 




MOV 


012737 


006606 


001244 




MOV 


012737 


006636 


001246 




MOV 


104207 






IS: 


ERROR 



;SET AGO OPE&AND 
:FSPC 

;TEST INSTRUC T ICN 

;OET FPS 

;GET THE RESULT 

;IS IT CORRECT 



;FPS CORRECT' 



•3200, R4 
R4 

•HH22,atITMP2 
•HHPS.RO 

(RO).ACO 
•HHPS.RO 
(RO),AC0 
RS 

•HHOATO.RC 
ACO.(RO) 
•HHPll.Rl 
•4.R2 

(ROJ+, (Rl)+ 

HH24 

3«HHER9 

R2.HH23 

•10. R4 

R4.RS 

HH^S 

9SHHER10 
3SHH00NE 

R5,a»STMP10 

R4.3«STMP11 

•HHP1,3»STMP3 

«HHP0.a«$TMP4 

•HHDAt0.a»$TMP5 

•HHP2,atSTMP6 

207 



:SET JP THE LOOP ON ERROR ADORES 
;SET FIV. FIV, AND FD 



;SET ACO OPERAND 
;FSPC 

; TEST INSTRUCTION 

;GET FPS 

;CET THE RESULT 

;IS IT CORRECT 



ITS CORRECT' 



103 



"IhI^C-I.-D^PB-h POP :i 

r^pea.Pi: c:-NOv-rfe 2: : ob 



34 CPP DIAGNOSTIC PART 2 MACY11 27(1006* 
Tl RCUNCN'RUNk TEST 



Ol-NCV-^b 51 



1783 
PB4 

res 

17% 
1787 
1788 
17OT 
1790 
1791 
1792 
1793 
1794 

r« 

17% 
1797 
1798 
1799 
1800 

1804 



1807 
1808 
1809 
1810 
1811 
1812 
1813 
1814 
1815 
1816 
1817 
1818 
1818 
1820 
1821 
1822 
1823 
1824 
182S 
182b 
1827 
1828 
1829 
1830 
1831 
1832 
1833 
1834 
1835 
183b 
1837 
1838 



CCSbTQ 
005b7M 
005b74 
0OS7OC 
005704 
005712 
005720 
00572b 
005734 
00573b 
005742 
005742 
0057% 
005752 

m& 

005774 
00b002 



D00137 00b75b 




00b03M 
008042 
OObOSO 
008052 
008058 
008058 
008082 
008088 
008074 
008102 
008110 
00811b 
008120 
008124 
008124 
008130 
008134 
008142 
006150 
008158 
006164 
006166 
006172 
006172 
00617b 
006202 
006210 
006216 
006224 
006232 
008234 
006240 



CI 0537 
010437 
012737 
012737 
012737 
012737 
104211 
000137 

010537 
010437 
012737 
012737 
012737 
012737 
104210 
000137 

010537 
010437 

8il?37 
012737 
012737 
104207 
000137 

010537 
010437 
012737 
012737 
012737 
012737 
104214 
000137 

010537 
010437 
012737 
012737 
012737 
012737 
104207 
000137 

010537 
010437 
012737 
012737 
012737 
012737 
10421b 
000137 



CCi2*>2 
001254 
00662b 
OObblb 
OObbOb 
008636 

00675b 

001252 
00125* 
0Ob62b 
OObblb 
OObbOb 
00bb3b 

00b756 

001252 
001254 



OObbOb 
006656 

00675b 

001252 
001254 
006676 
006866 
006806 
006656 

006756 

001252 
0012S4 
008726 
006716 
006606 
008706 

006756 

001252 
001254 
006726 
006716 
006606 
006706 

006756 



001240 
001242 
001244 
001246 



001240 
001242 
001244 
00124b 



881$ 

001244 
001246 



001240 
001242 
001244 
001246 



001240 
001242 
001244 
001246 



001240 
001242 
001244 
001246 



HHERI 



IS: 

HHEROO: 



1$: 

HHER2: 



IS: 

HHER3: 



IS: 

HHER4: 



IS: 

HHER5: 



IS: 

HHER6: 



JMP StHHDONE 

MOV RS.atSTMPIO 

MOV R4.31STMP11 

MOV lHHPl,a«TMP3 

MOV 1HHP0.3ISTMP4 

MOV IHHOATO.SISTMPS 

MOV lHHP2,al»STMPb 

ERROR 211 

JMP atHHDONE 

MOV R5,3«STMP10 

MOV R4.31STMP11 

MOV tHHPl,3lSTMP3 

MOV 1HHPQ.31STMP4 

MOV •HHDAtO,3lSTMP5 

MOV tHHP2,3lSTMPb 

ERROR 210 

JMP 3IHH00NE 

MOV R5.31STNP10 

MOV R4.3ISTMP11 

MCV lHHOflT0,3lSTMP5 

MOV tHHP4 , StSTMPb 

ERROR 207 

JMP 3IHH00NE 

MOV R5.31STMP10 

MOV R4,3lSTMFll 

MOV IHftPb.artTffS 

MOV •HHPS.3lST»»4 

MOV IHHOAiO . 3 1STMP5 

MOV •HHP4.3ISTMP6 

ERROR 214 

JMP atHHDONE 

MOV RS.StSTNPlG 

MOV R4,3tSTMPll 

MOV tHApS.StSTMPS 

MOV •HHP8.3tSTMP4 

MOV iHHDflto,3lSTHP5 

MOV •HHP7,3lSTMP6 

ERROR 207 

JMP 3IHH00NE 

MOV R5,3tSTMP10 

MOV R4.3ISTMP11 

MOV IHApg.aiSTMPS 

MOV 1HHP8.3ISTMP4 

MOV iHHDflTO, 3ISTMP5 

MOV •HHP7,3k$TMP6 

ERROR 216 

JMP 31HHD0NE 



MAIMDEC-11-DFFPB-A 
DFrpBrt.Pll Cl-NCV- 
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183*3 
1840 
1941 
1842 
1843 

1844 
1845 
19% 
18*7 
1§48 
.94S 
19SC 
i85l 
1952 
1853 
1854 
1955 
iBSe 
1857 
1958 
1959 
i860 
1861 
1962 

:963 

1864 

;965 

1866 
196.7 

:9b8 

1869 
1970 
1971 
1872 
1973 
1974 
1875 
1876 
1877 
1878 
1879 
1880 
1881 
1882 
1883 
1B84 
1885 
1886 
1887 
1888 
1889 
1890 
1891 
1892 
1993 
1B94 



0062M0 
006244 
006250 
006256 
006264 
006272 
006300 
006302 



006312 
006316 
006324 
006332 
006340 
006346 
006350 
006354 
006354 
006360 

mt 

006400 
006406 
006414 
00641b 
006422 
006422 
006426 
006432 
006440 
006446 
006454 
006462 
006464 
006470 
006470 
006474 
006500 
006506 
006514 
006522 
006530 
006532 
006536 
006542 
0065% 
006550 
006552 
306556 

006562 
006564 
306566 
006572 
006574 



010537 
010437 
012737 
012737 
012737 
012737 
104215 
000137 

010537 
010437 
012737 
012737 
012737 
012737 
104207 
000137 

010537 
010437 
012737 
012737 
012737 
012737 
104212 
00C137 

010537 
010437 
012737 
012737 
012737 
012737 
104207 
000137 

010537 
010437 
012737 
012737 
012737 
012737 
104213 
000137 
013703 
062703 
020316 
001402 
000137 
011637 

022626 
170201 
010137 
170301 
010137 
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001252 
001254 
006726 
006716 
006606 
006706 

006756 

001252 
001254 
006716 
006716 
006606 
006736 

006756 

001252 
001254 

006716 
006716 
006606 
006736 

006756 

001252 
001254 
006666 
006666 
006606 
006746 

006756 

001252 
001254 
006666 
006666 
006606 
006746 

006756 
001236 
000002 



036614 
001236 



001240 
001242 



001240 
001242 
001244 
001246 



001240 
001242 
001244 
0012% 



001240 
001242 
001244 
001246 



001240 
001242 
001244 
0C1246 



001240 
001242 
001244 
001246 



IS: 

HHER7: 



1$: 

HHERB: 



Tl ROUNC\ TRUNK TEST 

fICV RS.aiSTMPlO 

MOV R4,3lSTMPll 

flOV lHHP9,3lSTMP3 

MOV •HHPB.3HTMP4 

10V lHHDAT0,3lSTMF5 

MOV lHHP7,3i$TMPb 

ERROR 215 

JMP 3IHHD0NE 

MOV RS.aiSTMPIO 

MOV R4.3ISTMP11 

MOV 1HHPB,3ISTMP3 

MOV lHHP9.3tSTMP4 

MOV *HH0AT0.a»STMP5 

MOV •HHPlO.ilSTMPb 

ERROR 207 

JMP 31HH00NE 

MOV RS.aiSTMPiO 

MOV RM.aiiTMPll 

MOV •HHP8,3jfTMP3 

MOV lHHP8.ai$TMP4 

MOV •HHOAtO.atlTMPS 

MOV •HHPlO.JtSTHPb 

ERROR 212 

JMP StHHDOHE 

MOV RS.ailTHPIO 

MOV R4,aiJTMPll 

MOV frf)PS,3t$TMP3 

MOV •HHP5.3lfTMP4 

MOV •rtCAtO.atSTNPS 

MOV •HHPil.JtSTHPb 

ERROR 207 

JMP 5SHHD0NE 

MOV R5,3t$TMP10 

MOV R4.3ISTMP11 

MOV IHHP5,3I$TMP3 

MOV •HHPS.3tITMP4 

MCV tHHOftt0.3tSTMP5 

MOV tHHPll.atSTMPb 

IS: ERROR 213 

JMP 3IHHO0NE 

HHTRAP: MOV 3tSTMP2,R3 

ADD 12, R3 

CMP R3. (SP) 

BEG IS 

JMP 3IFPSPUR 

IS: MOV i5P),3lSTMP2 

CMP (SP) + ,(SPH 

STFPS Rl 

MOV R1.3ISTMP3 

STST Rl 

MOV R1.31STMP4 



IS: 

HHER9: 



IS: 

HHER10: 



:UAS THE TRAP TO 244 
:0N THE INSTRUCTION 
; BEING TESTED' 

; FAILURE OF FPS INTERRUPT 
; DISABLE BIT (nD=D 
:T0 INHIBI T TRAP. 
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1895 
18% 
18S7 
1898 
1899 
1*300 
1901 
1902 
1903 
1904 
1905 
190b 
1907 
1908 
1909 
tQin 

1911 
1912 
1913 
19.4 
1915 
191b 
1917 
1918 
1919 
1920 
1921 
1922 
1923 
1924 
1925 
1925 
1927 
1928 
1929 
1930 
1931 
1932 
1933 
1934 
1935 
193b 
1937 
1938 
1939 
1940 
1941 
1942 
1943 
1944 
1945 
19% 
1947 
1948 
1949 
1950 



OObbOO 
00bbC2 
OObbOb 
OObblO 
00bbl2 
00bbl4 
OObblb 
00bb20 
30bb22 
00bb24 
00bb2b 
00bb30 
00bb32 
005634 
00bb3b 
OObbHO 
00bb42 
006644 
0066% 
006650 
006652 
006554 
00665b 
006660 
006662 
006664 
006666 
0066^0 
006672 
006674 
00667b 
006700 
006702 
005704 
006706 
006710 
00b712 
006714 
00b71b 
005720 
005722 
006724 
005725 
006730 
006732 
006734 
006735 
005740 
006742 
006744 
0067% 
00675C 
006752 
005754 
005755 
005755 



104217 
000137 
000000 
000000 
000000 
000000 
000452 
125252 
125252 
125253 
000252 
125252 
125252 
125252 
000600 
000000 
000000 
000000 
000400 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
100200 
000000 
000000 
000000 
000300 
000000 
000000 
000000 
100000 
000000 
000000 
000000 
000200 
000000 
000000 
000000 
100300 
000000 
000000 
000000 
000400 
000000 
000000 
000000 
100400 
000000 
000000 
000000 

104412 



OOfc-Sb 



21: 

HHOATO: 

HHPO: 

HHP1: 

HHP2: 

HHP3: 

HHP4: 

HHPS: 

HHPfe: 

HHP?: 

HHP8: 

HHP9: 

HHP10: 

HHP11: 

HHDONE: 



ERROR 
JMP 

0 
0 
0 
0 

452 

125252 

125252 

125253 

252 

125252 

125252 

125252 

bOO 

0 

0 

i 

400 
0 
0 
0 

0 
0 
0 
0 

100200 
0 
0 
0 

300 

0 

0 

0 

100000 
0 
0 
0 

200 
0 
0 
Q 

100300 
0 
0 
0 

400 
0 
0 
0 

100400 
0 
0 
0 

RSETUP 



217 

3IHHD0NE 



;HHPO ♦ HHP1 WITH 

; PROPER NORMALIZATION 



:HHPO ♦ HHP1 WITH 
;BAO NORfWLIZATION 



;HHP7 = HHPS r HHP9 
; = HHPS ♦ HHPb 



; HHP 10 = HHP8 + HHPS 



; HHP 11 = HHP5 ♦ HHP5 



;G0 INITIALIZE THE FPS AND STACK; ANC 
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1951 










1952 










1953 










1954 










1955 










1956 










1957 










1958 










1959 










I960 










1961 










1962 










1963 










1964 










1965 










1966 










1967 










1968 










1969 










1970 










1971 


006760 


000004 






1972 










1973 










197M 


006762 








1975 


006762 


104413 






1976 


006764 


012704 


000200 




1977 


006770 


170104 






1978 


006772 


012737 


007020 


001236 


1979 


007000 


012737 


010052 


000244 


1980 


007006 


012700 


011624 




1981 


007012 


172410 






1982 


007014 


012700 


011624 




1983 


007020 


172010 






1984 


007022 


170205 






1985 


007024 


012700 


011554 




1986 


007030 


174010 






1987 


007032 


012701 


011634 




1988 


007036 


012702 


000004 




1989 


007042 


022021 






1990 


007044 


001402 






1991 


0070% 


000137 


010150 




1992 


007052 


077205 






1993 


007054 


052704 


000006 




1994 


007060 


020405 






1995 


007062 


001402 






19% 


007064 


000137 


010216 




i997 










1998 










1999 


007070 








2000 


007070 


104413 






2001 


007072 


012704 


001200 




2002 


007076 


170104 






2003 


007100 


012737 


007126 


001236 


2004 


007106 


012737 


007144 


000244 


2005 


007114 


012700 


011624 




2006 


007120 


172410 
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SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTuAPE 
VIRTUAL CONSOLE SWITCH REGISTER U A: 
THE USER TYPED CONTROL G*) . 



*************************************************************** 

iTEST 2 OVERMJNDER TEST 

*THIS IS A PARTIAL TEST OF THE OVER\UNOER 
tFLOWS. ONE OVERFLOU ANO TWO UNDERFLOW 
-CONDITIONS ARE CHECKED. THE REMAINING 
-UNDERFLOW CONO. AND THE REMAINING OVERFLOW 
*CONO. WILL BE CHECKED LATER USING THE 
*XXX INSTRUCTION. HERE EACH CONDITION TESTED 
•IS CHECKED BOTH WITH TRAPS ENABLED 
*CFIU=1 OR FIVsl) AND ALSO WITH TRAPS 
•DISABLED CFIUsQ OR FIV=0). 
t 

.;«******#*##*##*#*•«#*##*#*»#*#*###*«******##«******##***»#** 

TST2: SCOPE 



:TEST 
&G1 : 



OVERFLOW CONDITION WITH TRAP DISABLER FIV=0 



GG2: 

GG3: 
GG4: 



GG5: 



LPERR 

MOV 

LOFPS 

MOV 

MOV 

MOV 

LOO 

MOV 

ADOO 

STFPS 

MOV 

STD 

MOV 

MOV 

CMP 

BEG 

JMP 

S08 

BIS 

CMP 

BEQ 

JMP 

; TEST 

•FIV : 

LPERR 

MOV 

LDFPS 

MOV 

MOV 

MOV 

LDD 



1200 ,R4 
R4 

•GG2 A aiJTMP2 
•GGERO, 3tFPVEC i 
•GGPS.RT 
(ROKACC 
•GGPS.RO 
(RO).ACU 
R5 

•GGOATO.RO 
ACO.CRO) 
•GGP6.R1 
•4.R2 

(R0)+ f <R1)+ 
GG4 

StGGERl 

R2.GG3 
•6 R4 
R4.R5 
GGS 
3fGGER2 
OVERFLOW WITH TRAPS ENABLED 
1 



:SET UP THE LOOP ON ERROR ADDRESS. 
; CLEAR FIU, FIV, AND SET FD 



;SET ACO OPERAND 
FSRC 

TEST INSTRUCTION 
T FPS 

T THE RESULT 
;IS IT CORRECT 



;FPS CORRECT' 



11200, R4 
R4 

lGGb,ai5TMP£ 
•GG7 SlFPVECT 
•GGPS.RO 

(RO),ACO 



;SET UP THE LOOP ON ERROR AOORESS. 
; CLEAR FIU, SET FIV, ANO FD 



;SET ACO OPERAND 
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2007 
2006 
2009 
2010 
2011 
2012 
2013 
2014 
201S 
201b 
2017 
2018 
2019 
2020 
2021 
2022 
2023 
2024 
2025 
2026 
2027 
2028 
2029 
2030 
2031 
2032 
2033 
2034 
2035 
2U36 
2037 
2038 
2039 
2040 
2041 
2042 
2043 
2044 
2045 
20Mb 
2047 
2048 
2049 

S 

20S2 
2053 
2054 
2055 
2056 
2057 
2058 
2059 
2060 
2061 
20b2 



007122 
007126 
007130 
007132 
007136 
007140 
007144 
007150 
007154 
007156 
007160 
007164 
007170 
007172 
007174 
007200 
007202 
007206 
007212 
007214 
007216 
007222 
007224 
007230 
007232 
007234 
007240 

007244 
0072% 
007250 
007252 



007256 
0072S6 
007260 
0T 7 :&4 
007266 
007274 
007302 
007306 
007310 

8o7§16 
007320 
007324 
007326 
007332 
007336 
007340 
007342 
007346 
007350 
007354 
007356 



012700 
172010 
170000 
012700 
174010 
000137 
013703 
062703 
02031b 
001402 
000137 
011b37 
022S26 
170205 
012700 
174010 
012701 
012702 
022021 
001402 
000137 
077205 
052704 
020405 
001402 
000137 
012704 

17030S 
020405 
001402 
000137 



104413 
012704 
170104 
012737 
012737 
012700 
172410 
012700 

m 

012700 
174010 
012^01 
012702 
022021 
001402 
000137 
077205 
052704 
020405 
001402 



011624 



011554 

010264 
00123b 
000002 



03bbl4 
00123b 



011554 

011634 
000004 



010332 
100006 



010402 
000010 



010334 



000200 



01 1554 

011634 
000004 



010546 
000004 



GGb: 



GC7: 



IS: 



GG8: 
GG9: 



IS: 

; CHECK 



; CHECK 
:TRAPS 
GGlOr 



MOV 
ADOO 
CFCC 
MOV 
STO 
JMP 
MOV 
AOD 
CMP 
8EQ 
JMP 
MOV 
CMP 
STFPS 
MOV 
STO 
MOV 
MOV 
CMP 
BEQ 
JMP 
SOB 
BIS 
CMP 
BEQ 
JMP 
NOV 
FEC 
STST 
CMP 
BEQ 
JMP 



•GGP5.R0 

(RO).ACO 

IGGOATO.RO 

ACO.(RO) 

SIGGER3 

3ISTMP2.R3 

12, R3 

R3,(SP) 

IS 

3«FPSPUR 
(SP),3lSTMP2 

(SPH,(SPH 
R5 

IGGOATO.RO 
ACO.(RO) 
•GGP6.P1 
•4.R2 

(R0)* f (Rl)+ 
GG9 

3tGG£R4 

R2.GG8 

•100006.R4 

R4,R5 

If 

9IGGER6 
110, R4 



;FSPC 

;TEST INSTRUCTION 



;GET THE RESULT 
;IS IT CORRECT 



;FPS CORRECT' 



R5 

R4.R5 
GG10 
StGGERS 
UNDER FLOW CONDITION UITH 
0ISA8LED (FIU = 0) 



007314 001236 

OHM" 
0115? 

011604 



010450 000244 

"11574 



GG11: 

GG12: 
GG13: 



LPERR 

MOV 

LOFPS 

MOV 

MOV 

MOV 

IDO 

MOV 

m 

MOV 
STD 
MOV 
MOV 
CMP 
BEQ 
JMP 
SOB 
BIS 
CMP 
BEQ 



•0200, R4 
R4 

•GG11.3MTNP2 

!$&8 ,FPVECT 

(RO).ACO 
•GGP3.R0 
(RO),ACO 
R5 

•GGDATO.RO 
ACO.(RO) 
»GGP6,R1 
•4.R2 

(R0H,(R1) + 

GG13 

3SGGER8 

R2.GG12 

«4,R4 

R4.R5 

GG14 



; SET UP THE LOOP ON ERROR ADDRESS. 
;SET FIU, FIV. AND FD 



;SET ACQ OPERAND 
;FSRC 



TpT^^NSTRUCTION 
GET THE RESULT 
;IS IT CORRECT 



;FPS CORRECT- 



MmINDEC-11-O c FPB-A 
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2083 
2064 
2065 



2069 

2070 

W?k 

2073 

2074 

?07S 

2i j 7b 

2077 

2078 

2073 

2080 

2081 

2082 

2083 

2084 

208S 

208b 

2087 

2088 

2089 

2090 

2091 

2032 

2033 

2094 

203S 

20% 

2337 

2038 

2033 

2100 

2101 

2i02 

2103 

21 OS 

2105 

210fe 

2107 

2108 

2l03 

2110 

2111 

2112 

2113 

2114 

2115 

211b 

2117 

2118 



PDP II '34 FPP DIAGNOSTIC PART 2 
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0073b0 


000137 


0l0bl4 


0Q7364 






QQ7364 


104413 




00736b 


C12704 


002200 


PJE972 


170104 




007374 


012737 


007422 


QQ7H0? 
007410 


012700 


007440 
011574 


007414 


172410 




00741b 


012700 


011b04 


007422 


172010 




007424 


170000 




007426 


012700 


011554 


007432 


17M010 




007434 


000137 


010bb2 


007440 


013703 


00123b 


007444 


062703 


000002 


007450 


021b03 




007452 


001402 




00745M 


000137 


03bbl4 


007460 


011b37 


00123b 


007464 


022b2b 




007466 


170205 




007470 


012700 


011554 


007474 


174010 




007476 


012701 


011b44 


007502 


012702 


000004 


UUf DUD 


UCCUCl 




007510 


001402 




007512 


000137 


010730 


00751b 


0, . 205 




007520 


052704 


100000 


007524 


020405 




00752b 


00 1402 




007530 


000137 


01077b 


007534 






007534 


012704 


000012 


007540 


170305 




007542 


020405 




007544 


001402 




00754b 


000177 


001272 



T2 



GG14: 



OVEPAUNDER test 



00123b 
000244 



GG15: 



GGlb: 



IS: 



GG17: 



GG18: 



25: 
IS: 

: CHECK 



JMP 3IGGER3 

;CHECK UNDERFLOW CONDITION UITH 
; TRAP ENABLED (FIU = 1) 



LPERR 

NOV 

LDFPS 

MOV 

MOV 

MOV 

LCD 

MOV 

ADDD 

CFCC 

MOV 

STD 

JMP 

MOV 

ADD 

CMP 

BEQ 

JMP 

MOV 

CMP 

STFPS 

MOV 

STD 

MOV 

MOV 

CMP 

BEQ 

JMP 

SOB 

BIS 

CMP 

BEQ 

JMP 



MOV 
FEC 
STST 
CMP 
BEQ 
JMP 



•2200, R4 
R4 

•GG15.3ISTMP2 

»r 

(RO).ACO 
•GGP3.R0 
(RO),ACO 

•GGDATO.RO 

ACO.(RO) 

3IGGER10 

3HTMP2.R3 

•2. R3 „ 

(SP3.R3 

IS 

3SFPSPUR 
(SP),3lSTMP2 
(SP)+,(SP)+ 
R5 

•GGDATO.RO 
ACO.(RO) 
•GGP7.R1 
•4.R2 

(R0)+,(R1)+ 

GG18 

3«CG£R1I 

R2.GG17 

•100000, R4 

R4,R5 

2S 

3«GGER12 
•12. R4 



:SET UP THE LOOP ON ERROR ADDRESS. 
|SET FIU, FIV, AND F D 



;SET ACO OPERAND 
;FSPC 

; TEST INSTRUCTION 



;GET FPS 

;GET THE RESULT 

: IS IT CORRECT 



:FPS CORRECT 7 



R5 

R4.R5 
GG19 

3GGER13 , „„ 

; CHECK UNDERFLOW CONDITION WITH TRAPS 
; DISABLED (FIU = 0) 



007552 








007552 
007554 


104413 






012704 


000200 




007560 


170104 






007562 


012737 


007biO 


00123b 


007570 


012737 


011112 


000244 


00757b 


012700 


011574 




007602 


172410 






007604 


012700 


011bS4 




007b 10 


172010 







GG19: 



GG20: 



LPERR 

MOV 

LDFPS 

MOV 

MOV 

MOV 

LDD 

MOV 

ADDD 



;SET UP THE LOOP ON ERROR ADDRESS. 
•SET FIU, FIV, AND FD 



•0200, R4 
R4 

•GG20,3i$TMP2 
«GGERl4.3«FPVECT 

•GGP2.R6 ;SET ACO OPERAND 

(RO).ACO 

•GGPB.RO ;FSPC 

(RO),ACO TEST INSTRUCTION 



BD4 
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=::«? 

2120 
2121 
2122 



212S 
2126 

2ir 

2126 
212S 
21X 

ii3H 

2135 
213b 
2137 
2136 
2139 
2140 
2141 
2142 
2143 
2144 
2145 
21% 
2147 
2148 
2i4<? 
2150 
2151 
2152 
2153 
2154 
2155 
2156 
2157 
2158 
2159 
2160 
21bl 
2162 
2163 
2164 
21E>5 
2ibb 
21B7 
21b8 
21b9 
2170 
2171 
2172 
2172 
217« 



CC7612 
007614 
OC7b20 
007622 



007636 
007642 
0C764M 
007650 
007652 
0C7654 



170205 
0 12700 
17H010 
012701 




1 

14C 
000137 
0772C5 
C527LN 
020405 
001402 
000137 



C11554 

011634 
300004 



011210 
000004 

011256 



GG21: 
GG22: 



007660 








007660 


104413 






007662 


012704 


002200 




007666 


170104 






007670 


012737 


007716 


001236 


007676 


012737 


007734 


00C244 


007704 


012700 


011574 




007710 


172410 






007712 


012700 


CI 1654 




007716 


172010 






007720 


170000 






007722 


012700 


011554 




007726 


174010 






no 7 7 m 








007734 


01JTJ0 


001236 




007740 


062700 


000002 




007744 


020016 






007746 


001402 






007750 


000137 


036614 




007764 


011637 


001236 




007760 


022626 






007762 


170205 






007764 


012700 


011554 




00//7U 


174010 






007772 


012701 


011664 




007776 


012702 


000004 




010002 


022021 






C10004 


001402 






010006 


000137 


011372 




010012 


077205 






010014 


052704 


100004 




010020 


020405 






010022 


001402 






010024 


000167 


001456 




C10030 


012704 


000012 




010034 


170305 






C1X36 


020405 






010040 


001402 






010042 


000167 


001372 





GG23: 



GG24: 



GG25: 



IS: 



GG26: 
CG27: 

II: 



STFPS 
MOV 
STD 
MOV 
MCV 
CMP 
BEQ 
JHP 
SOS 
BIS 
CMP 
BEQ 

jhp 

: CHECK . 
;ENABLEO 

LPERR 
hov 

LDFPS 
flOV 

nov 

MOV 
LDO 
MOV 
flOOC 
CFCC 
MOV 
STD 
JHP 
MOV 
ADC 
CMP 
BEQ 
JMP 
MOV 
CMP 
STFPS 
MOV 
STD 
MOV 
MOV 
CMP 
BEQ 
JMP 
SOB 
BIS 
CMP 
BEQ 
JMP 
MOV 
:CHECK 
STST 
CMP 
BEQ 
JMP 



RS 

•GGDATO.RO 
AC0.(R05 
•GGP6.R1 
•4.R2 

iRO)*,CRl)* 
GG22 

QtGGERlS 
R2.GG21 
•4.R4 
R4.R5 
GG23 

atGGERlb 



01-N0V-76 21:12 PAGE < 



;GET FPS 

; GET THE RESULT 



;IS IT CORRECT 



;FPS CORRECT' 



UNDERFLOW CONDITION UITH TRAP 
0 (FIU = 1) 



•2200. R4 
R4 

tGG24,SlSTMP2 
•GG25,3lFPVECT 
•GGP2.R0 

(RO).ACO 
•GGP6.R0 

(RO),AC0 

•GGDATO.RO 
RCO.sRO^ 
QSGGER17 
StSTMP2,R0 
i2,R0 
RO, (SP) 
IS 

atFPSPUR 

(SP),atSTMP2 

(SP>*.<SP>* 
RS 

•GGOATO.RO 
RCOjiROi 
•GGW.Ri 
■4.R2 

iRO)*,(RD* 
GC27 

atGGERlB 
R2.GC26 
•100004, R4 
R4, RS 
IS 

GGER20 
•12, R4 
FEC 
R5 

R4.R5 
GG2S 
GGER19 



;SET UP THE LOOP ON ERROR ADORES 
;SET FIU, FIV. AND FD 



;SE T ACC OPERAND 



;FSRC 

;TES' INSTRUCTION 



;G£T FPS 

:GET THE RESULT 

:IS IT CORRECT 



;FPS CORRECT' 



C04 



"Kifcec-n-DTFPB-fi po* 5 :; 



2H FPP DIAGNOSTIC PART 2 MAC^H 27il00fc 



2175 
217b 
2177 
2178 
2179 
2180 
2181 
2182 
2183 
2184 
2185 
218b 
2187 
2188 
2189 
2190 
2191 
2192 
2193 
219M 
£195 
21% 
2197 
2198 



2201 
2202 
2203 
2204 
2205 
220b 
2207 
2206 
2209 
2210 
2211 
2212 
2213 
2214 
2215 
221b 
2217 
2218 
2219 
£220 
2221 
2222 
2223 
2224 
2225 
Z22b 
2227 
2228 
2229 
222C 



0100% 

010052 
01005b 
Ol00b2 
010064 
Ol OObb 
010072 
010072 
010074 
Q10100 
010102 
01C104 
010110 
010112 
01012) 
01012b 
010134 
010142 
010144 

01C150 
010150 
010154 

urn 

01017M 
010202 
01C210 
010212 

01021b 
01021b 
010222 
01022b 
01023M 
0102M2 
010250 
01025b 
0102b0 



•Wit "J"* 


ui ID' ~ 


U1J/U1 


no i pat 


Ubc< ui 


JSJUUUc 


nan l it 

UCU1 ID 




no, tun? 




(YV1 1 T? 
UUUi J/ 








nan t a? 




UU1J' c 




Q22fepfe 




OlPS 


011554 


174010 




012737 


3llb24 


012737 


Qllb24 


012737 


011554 


012737 


011b34 


104220 




000137 


0ilb74 



T2 
GG28: 
GGERO: 



5S. 

IDS: 



OVERxJNOER TEST 



001240 
001242 
001244 
00124b 



IS: 

GGER1: 



010537 


001252 




010437 


001254 




8i§3? 


8ilS 


88£8 


012737 


011554 


oor j 4 


012737 


011b34 


001. . 


104207 






000137 


011b74 





IS: 

GGER2: 



010537 


001252 




010437 


001254 




012737 


0iib24 


001240 


012737 


011b24 


X1242 


012737 


011554 


001244 


012737 


011b34 


00124b 


104232 






000137 


011b74 





IS: 



J IP 

10V 
A0D 

crip 

BEG 
JMP 

STST 
CMP 

ere 

CMP 

mov 

STD 

MOV 

MOV 

MOV 

MOV 

ERROR 

JMP 




MOV 

MOV 

MOV 

MOV 

MOV 

MOV 

ERROR 

JMP 



0102b4 








GGER3: 




0102b4 


010537 


001252 






MOV 


010270 


010437 


001254 






MOV 


010274 


012737 


011b24 


001240 




MOV 


010302 


012737 


011b24 


001242 




MOV 


010310 


012737 


011554 


001244 




MOV 


01031b 


012737 


011b34 


00124b 




MOV 


010324 


104221 






IS: 


ERROR 


01032b 


000137 


0llb74 






JMP 


010332 


00070b 






GGER4: 


BR 


010334 








GG£R5: 




010334 


010537 


X1252 






MOV 


010340 


010437 


001254 






MOV 



JiGGOONE 

St$TMP2,R. 
•2.R1 

R1.(SPj 

ioi 

StFPSPUR 
Rl 

Rl.llQ 
SS 

(SP)*.(SP)* 

•GGDAtO.RO 

ACO.(RO) 

iGGP5.atSTMP3 

iGCP5.3HTMP4 

•GG0At0.5lSTMP5 

•GGPb.StSTMPfc 

220 

StGGDONE 



RS.aHTMPlO 
R4.atSTMPll 

•GG0AT0.9MTMP5 
g£PS,aWTMPb 

atGGOorc 

RS.aHTMPlO 
RMjiSTHPll 

•dtfs.atSTMPs 

St0.atSTMP5 

i.afctTMPb 

232 

atGGCorc 



RS.atSTMPlO 

R4.artTMPll 

SG6PS,dtSTMP3 

•CGPS:artTMP4 

iGGOAt0.aiSTMP5 

•GGPb.afcSTHPb 

221 

StGGDOfC 
GGERl 



RS.atSTMPlO 
R4.3ISTMP11 




•^•ccc-ii-o^ee-.; pop :i 34 fpp diagn:s* 



2233 
2234 
2235 
22% 
2237 
2236 
2273 
22HC 
2241 
224£ 
22M3 

2?44 
22% 
22% 
=247 
c2% 
22H<3 
22S0 
22SI 
2252 
2253 
2254 
2255 
22% 
2257 
2256 
2259 
2260 
2261 
2262 
22S3 
2264 
2265 
2266 
2267 
2266 
2269 
2270 
2271 
2272 
2273 
2274 
2275 
2276 
2277 
2278 
2279 
2280 
2281 
2282 
2283 
2284 
2285 
2286 



£ 3fS£ iM sliBi ffiiSS 

313360 012737 G11554 " 

310366 012737 011634 

010374 104226 

010376 000137 



010402 
010402 
C10406 
010412 
010420 
010426 
010434 
010442 
010444 

010450 
010454 
01046C 
010462 
010464 
010470 
010470 
010472 
010476 
010500 
010502 
010506 
010510 
010516 
010524 
010532 
010540 
010542 

0105% 
0105% 
010552 
010556 
010564 
010572 
010600 
010606 
010610 

010614 
010614 
010620 
010624 
010632 
010640 
0106% 
010654 
010656 



010537 
C10S37 
012737 
012737 
012737 
012737 
104227 
000137 

013701 
062701 
020116 
001402 
00C137 

170301 
020127 
001372 
022626 
012700 
174010 
012737 
012737 
012737 
012737 
104224 
000137 



010537 
010437 
012737 
012737 
012737 
012737 
104207 
000137 



010537 
010437 
012737 
012737 
012737 
012737 
104232 
000137 



011674 



0CI2S2 
0012SM 
011624 
011624 
011554 
011634 

011674 

001236 
000002 



036614 



000012 



011554 

011604 
011574 
011554 
011634 

011674 



001252 
001254 
011604 
011574 
011554 
011634 

011674 



001252 
001254 
011604 
011574 
011554 
011634 

011&74 



001244 
0012% 



X124C 
001242 
001244 
0012% 



001240 
001242 
001244 
0012% 



001240 
001242 
001244 
0012% 



001240 
001242 
001244 
00124b 



II: 

GGERb: 



GGER7: 



SS: 
10S: 



IS: 

GGER8: 



IS: 

CGER9: 



IS: 



D04 

l nftCYll 27^1006- Ol-NCV-76 21:12 -»2 
CEP- TEST 

•WP5.3ts:rf>3 
•toGPS.sirnp4 

•GGDATO.SiSTrPS 
•GGP6. 3kSTtf>fe 
226 

JtGGDONE 



RS.SHTff 10 

R4 1 JiSTf1Pli 

•GGP5,aiSTr*>3 

•GGPS.SiSTff>4 

•GGDAto.atSTMPS 

•GGP6.alSTf*>fc 

227 

atGGDOfC 

atSTnP2.Ri 

12. Rl 

Rl.(SP) 
iOt 

aiFPSPUR 
Rl 

Rl,tl2 
5S 

(SPH.CSP)* 
•GGOPtO.RO 

AC0.(ROl 

•GGP3,3«Tfff>3 

•GGP2.3ISTWN 

•GGOAt0,3lSTtf>5 

•GGPb.SiSTffb 

224 

3tGGO0NE 



RS.SiSTMPIO 

WlSHTHPll 

•GG>3,3l$Tff»3 

•GCP2!3tSTHP4 

•GGDfit0.3iSTrtP5 

!GGP6,3lSTff>6 

207 

3tGGD0f€ 



R4!aiSTHPll 

•GGP3,aiSTff>3 

•GGP2.3HTNP4 

iGGDfit0.3«STHP5 

•GGP6,afcSTrfb 

232 

aiGGOONE 



■VilrCEC-il-DfrPS-H POP I! 34 FPP DIAGNOSTIC PART 

:«"PBfi. B ii Ql-NCv-7b 21:06 T2 CVER\ 



2287 

WW w ' 


W 4 WWWW 








GGER10: 


MOV 


2296 


010662 


010537 


0012S2 






WW W J 


010666 


010437 


001254 






PI0V 


22S0 


010672 

U1UO' W 


012737 

Wib' W * 


011604 


001240 




MOV 


2261 
2562 


010700 
01O7& 


012737 
012737 


011574 
011554 


001242 
001244 




10V 
PI0V 


2263 


010714 


012737 


011644 


00124b 




nov 


2264 

w w * * 


010722 

UiW WW 


104225 






IS: 


ERROR 


2265 


010724 


000137 


011674 






jnp 


22% 














2267 


01073C 








GGER11: 


nov 


2266 


010730 


G 10537 


001252 






2266 


010734 


010437 


001254 






nov 


2300 


010740 


012737 


011604 


001240 




nov 


2X1 


0107% 


012737 


011574 


001242 




nov 


2302 


010754 


012737 


011554 


001244 




MOV 


2303 

W WWW 


010762 

W * W • WW 


012737 

W A W ' W* 


011644 


001246 




nov 


23CM 


010770 


104207 






IS: 


ERROR 


2305 


010772 


000137 


011674 






JHP 


2306 














2307 


01077b 








GGER12: 




2308 

WWWW 


010776 


013537 

w & www* 


001252 

WW A W WW 






nov 


2306 


011002 


010437 


0C12S4 






nov 


2310 


01100b 


012737 


011604 


001240 




nov 


2311 
2312 


011014 
011022 


012737 
012737 


011574 
011554 


001242 
001244 




nov 
nov 


2313 


011030 


012737 


011644 


001246 




nov 


2314 


01103b 


104231 






IS: 


ERROR 


2315 


011040 


000137 


011674 






jnp 


231b 














2317 


011044 








GGER13: 




2318 


011044 


010537 


001252 






nov 


2316 


011050 


010437 


001254 






nov 


2320 


011054 


012737 


011604 


001240 




nov 


2321 


011062 


012737 


011574 


001242 




nov 


2322 


011070 


012737 


011554 


00124^: 




nov 


2323 


01107b 


012737 


011644 


001246 




nov 


2324 


011104 


1042X 






IS: 


ERROR 

Jnp 


232S 


01110b 


000137 


011674 






232b 














£327 


011112 
01111b 


013701 


001236 

WW A WWW 




GGER14: 


nov 


2328 


062701 


000002 






aoo 


2326 


011122 


020116 








CHP 


2330 
2331 


011124 
01112b 


001402 
000137 


036614 




5S: 


BEG 

jnp 


2332 


011132 








1QS: 




2233 


011132 


170301 








STST 


2334 


011134 


020127 


000012 






cnp 


2335 
233b 


011140 
011142 


0^1372 








81 


2337 


011144 


012700 


011554 






nov 


2338 


011150 


174010 








STD 


2336 














2240 


011152 


012737 


011564 


001240 




nov 


23-ti 


011160 


012737 


011604 


001242 




nov 


£'2h£ 


011166 


012737 


011554 


001244 




nov 



E04 

nACYll 27^1006) 01-N0V-76 21:12 PftG£ 43 
iER TEST 



Rs.aiSTnPio 
R4.aiSTnPii 

!GGP3,aiSTnP3 

iG^oSt?*SsTnP5 
•GGP7,aisTnPb 

225 

aiGGOONE 



Rs.aiSTnPio 
R4.aiSTnpn 

tGGP3,8lSTnP3 
•GGP2.3rtTnP4 
•GG0fit0.aiSTnP5 

tGGP7,alSTnPb 

207 

aiGGOONE 



Rs.atsTnpio 
R4.atSTnru 

lG6P3,atSfflP3 



_^.j,3tSTnP5 

•GGP7,atSTnP6 

231 

atGGDOfC 



RS.atSTHPlO 
P^.atSTHPll 

•GG>3,atSTnP3 

■CGP2!5tSTnp4 
•GGOflto.atSTnps 

•GGP7 t aiSTnP6 



230 

a to 



iGGOOrC 

atSTnp2,Ri 

•2.R1 

L (SP) 



aiF! 



PSPUR 



Rl 

R1.I12 

?|p)*.(SP)+ 

•GGDflTO.RO 

flC0,(R05 

•GGPi,ai$TnP3 
•GGP3,ai$TnP4 

iGG0RT0,3MSTnP5 



2343 
2344 
2345 
23% 
2347 
2348 
2349 
2350 

2353 
23SM 
2355 
2356 
2357 
2358 
2359 

2361 
2362 
2363 
2364 
2365 
2386 
2367 
2366 
2369 
2370 
2371 
2372 
2273 
2374 
2375 
2376 
2377 
2378 
2379 
2380 
2381 
2382 
2383 
238M 
2385 
2386 
2387 
2388 
2389 
2390 
2391 
2392 
2393 
2394 
2395 
23% 
2397 
239e 



C1117M 
011202 
0112O4 

811118 

011214 
011220 
011226 
011234 
011242 
011250 
011252 

011256 
011256 
011262 
011266 
011274 
011302 
011310 
011316 
011320 

011324 
011324 
011330 
011334 
011342 
011350 
011356 
011364 
011366 

011372 
011372 
011376 
011402 
011410 
011416 
011424 
011432 
011434 

011440 
011440 
011444 
011450 
011456 
01 1464 
011472 
011500 
011502 

011506 
011506 



212737 
124222 
000137 



010537 
0 J 0437 
012737 
012737 
012737 
012737 
104207 
000137 



010537 
010437 
012737 
012737 
012737 
012737 
104232 
000137 



010537 
010437 
012737 
012737 
012737 
012737 
104223 
000137 



010537 
010437 
012737 
012737 
012737 
012737 
104207 
000137 



pop 

21:26 

011634 

01167* 



001252 
X12S4 
011574 
011654 
011554 
011634 

01 1674 



001252 
001254 
011574 
011654 
011554 
011634 

011674 



001252 
001254 
011574 
011654 
011554 
011664 

011674 



001252 
001254 
011574 
011654 
011554 
011664 

011674 



FQ4 

<34 FPP DIAGNOSTIC PART 2 HACY11 27(1006) 
T2 OVERMJNOER TEST 



01-H0V-76 21:12 PAGE 44 



021246 



001240 
001242 
001244 
001246 



001240 
0012«2 
001244 
001246 



001240 
001242 
001244 
001246 



001240 
001242 
001244 
001246 



IS: 

SGERlS: 



IS: 

GGER16: 



IS: 

GGER17: 



IS: 

GGER18: 



IS: 

GGER19: 



010537 


001252 




MOV 


010437 


001254 




MOV 


012737 


011S74 


001240 


MOV 


01g737 


011654 


001242 


MOV 


012737 


011554 


001244 


MOV 


012737 


011664 


001246 


MOV 


104230 




IS: 


ERROR 


000137 


011674 




JMP 



010537 0C12S2 



GGER20: 



MOV 1GGP6.31STMP6 

ERROR 222 

JMP 3tGGD0NE 



MOV R5,3tSTHPlO 

MOV R4,3tSTMPll 

MOV lGGP2,aiSTMP3 

MOV tGGP8.3t$THP4 

MOV tGGDRT0,3lS T MP5 

MOV tGGP6,3iSTMP6 

ERROR 207 

JMP StGGOONE 



MOV RS.atSTHPlO 

MOV R4.3ISTHP11 

MOV tGGP2.3t$THP3 

MOV tGGP8.3HTHP4 

MOV tGGOAT0,atiTMP5 

MOV •GGP6.aiSTMP6 

ERROR 232 

JMP atGGDONE 



NOV RS.3ISTNP10 

MOV R4 i atSTNPll 

MOV tGfcP2,3tSTMP3 

MOV tGGP8.3tSTNP4 

MOV •GGWtO.atSTNPS 

MOV •GGP9,attTMP6 

ERROR 223 

JMP atGGDONE 

MOV RS.atSTNPIO 

MOV R4.3tSTHPll 

MOV SGGP2,atSTMP3 

MOV fGGP8.atSTNP4 

MOV tGG0AT0 f 3tSTMP5 

MOV •GGP9,3lSTNP6 

ERROR 207 

JMP atGGDONE 



R5.3ISTMP10 

R4.3ISTHP11 

tGGP2,3tSTMP3 

IGGP8.3ISTMP4 

tGGOflt0,3tSTNP5 

lGGP9,3tSTMP6 

230 

atGGDONE 



MOV R5,3tSTMPlO 



G04 



•*inc€:-i:-df c pb-a 



PCF 



24 FPP 



DIAGNCS* 




24! 

2405 
2406 

2407 

?Hoe 

240S 
2S1C 

cm: 

2413 
2414 
2415 
2416 
2417 
2418 
2419 
242C 
2421 
2422 
2423 
2424 
2S2S 
2426 
2427 
2428 
242<3 
2430 
2431 
2432 
2433 
2434 
2435 
2436 
2437 
2438 
243<3 
2440 
2441 
2442 
2443 
2444 

2445 
24% 
2447 
24MB 
2449 
2450 

S 4 53 
1-icZ 



C11S12 
011516 
011524 
011532 
"11540 
115% 
011550 



011554 
011556 
011560 
011562 

011564 
011566 
011570 
011572 
011574 
011576 
011600 
011602 
011604 
011606 
011610 
011612 
011614 
011616 
011620 
011622 
011624 
011626 
0116X 
011632 
011634 
011636 
011640 
011642 

011644 
0116% 
011650 
011652 
011654 
011656 
011660 
011662 
011664 
011666 
011670 
011672 
011674 
0U674 



010437 
012737 
012737 
012737 
012737 
104231 
000137 



000000 
000000 
000000 
000000 

000300 
000000 
000000 
000000 
100200 
000000 
000000 
000000 
000200 
000000 
000000 
000001 
010200 
000000 
000000 
000000 
077600 

oooooo 

000000 

oooooo 
oooooo 
oooooo 
oooooo 
oooooo 

062400 

oooooo 
oooooo 
oooooo 

000340 

oooooo 
oooooo 
oooooo 

000100 

oooooo 
oooooo 
oooooo 

104412 



001254 
CI 1574 
011654 
011554 
011664 



001240 
001242 
001244 
001246 



011674 



IS: 



; PAR T 2 HACY11 27il006) 
OVERnUNDER test 



Ol-NOV-76 21:12 PAGE 45 



NOV 

nov 
nov 

MOV 
40V 
ERROR 
JMP 



R4.at$TMPll 

iG&P2,atsTrf>3 

•GCP8.ai$TMP4 
•GGDAto.3i$TriP5 

•GGPg.aMTr^b 

231 

aiGGOONE 



GGDATO: 0 
0 
0 
0 



GGPi: 
GGP2: 
GGP3: 
GGP4: 
GGP5: 
GGP6: 

GGP7: 
GGP8: 
GGP9: 
GGDONE: 



300 
0 
0 
0 

100200 
0 
0 
0 

200 
0 
0 
1 

10200 
0 
0 
0 

77600 

0 

0 

0 

0 

0 

0 

0 

62400 
0 
0 
0 

340 
0 
0 
0 

100 

0 

0 

0 

RSETJP 



:OVEP FLOW = GGP5 ♦ GGP5 



OVERFLOW RESULT 
UNDERFLOW RESULT 
GGP6 = GGP4 ♦ GGP5 

= GGP3 ♦ GGP2 (FIU = 0) 

r GGP3 ♦ GGP1 
GGP7 = GGP3 ♦ GGP2 (FIU = 1? 



GO INITIALIZE THE FPS AND STACK; AND 

VIRTUAL CONSOLE SWITCH REGISTER iHAS 
THE USER TYPED CONTROL G* ) . 



H04 



:*" cd Bh.f:: ::-v 



2455 
2*5fc 

?45r 

?4SS 
2459 
246C 

2%: 

2-tbc 
2-»63 
2464 
2465 
2466 
2467 
?HbS 

2469 
2470 
2471 
2472 
2473 
2474 
2*475 
2476 

2477 

2479 
2479 
2480 
248! 
2482 
2483 
2484 
2485 
2486 
2487 
2488 
2489 
2490 
2491 
2492 
2493 
2494 
2495 
24% 
2497 
2498 
2499 
2500 
2501 
2502 
2503 
2504 
2505 
2506 
2507 
2508 
2509 
2512 



3-4 «c CIAiNOS'I 
T2 



: ear 2 macyi j 27noo6i 

0VER\JN0ER TEST 



Ol-40V-7fc 21:1= PACE 



Q117C0 
21170C 
C11702 
011706 
011710 
011714 
011716 
011722 
011730 
011732 
011736 
011740 
011744 
011744 
0117% 
21 1752 
011754 
011760 
011764 
011766 
011770 
011774 
012000 
012004 
012006 
012010 
012014 
01201b 
012022 
012024 
012030 
012032 
012034 

012040 
012040 
012042 
012046 

012050 
012054 

012056 
012062 



134413 
012704 
170104 
012700 
172410 
012700 
012737 
177420 
020027 
001402 
000137 

170205 
012700 
174010 
012701 
012702 
022120 
001415 
012701 
012700 
012702 
022120 
001402 
000137 
077205 
000137 
077220 
012704 
020405 
001402 
000137 



104413 
012704 
170104 

012700 
172410 

012700 
012737 



000202 

313314 

013324 
011730 

013330 
012672 

013304 

013374 
000004 



013324 
013304 
000004 



012732 
012762 
000200 

013030 

00020C 
013314 



013324 
012072 



: #t****#tt*#*##t**tttttttt*t#t##*t#*#t#f**t *##♦♦♦♦♦♦♦ ♦♦♦♦♦♦♦♦♦♦♦ 

* T EST 3 LOCFO AND LOCOF TEST 

♦THIS IS A TEST OF LDCFD AND LDCDF. 

*************************************************************** 

TST3: SCOPE 

; T EST FOR CORRECT AUTO INCREMENT CONSTANT. 
HX1 * 

:SET UP THE LOOP ON ERRCP ADDRESS 



00123b 



HX2: 



HX3: 



HX4: 



HX5: 

HX6: 
HX7: 



:N0W 
HX8: 



00123b 



012070 170001 



LPERR 
NOV 
LDFPS 
NOV 
LDD 
NOV 
NOV 
LDCFD 
CNP 
BEQ 
JMP 

STFPS 

NOV 

STD 

NOV 

NOV 

CNP 

BEQ 

NOV 

NOV 

NOV 

CNP 

BEQ 

JMP 

SOB 

JHP 

SOB 

NOV 

CNP 

BEQ 

JNP 

TEST 

LPERR 



NOV 
LDD 

NOV 
NOV 

SETF 



•200 ,R4 
R4 

•HXP1.R0 

(RO).ACO 

•HXP2.R0 

•HX2.fi«ITHP2 

(ROH.ACO 

R0.WXP2+4 

HXJ 

SSHXER1 
R5 

•HXDATO, RO 
ACO.(RO) 
•HXP7.R1 
•4.R2 

(Rl)*, (RO)* 
HX7 

•HXP2.R1 
•HXDATO, RO 
•4.R2 

(Rl)>»- f (RO) + 
HX6 

9SHXER2 

R2.HX5 

a*HXER3 

R2.HX4 

•200.R4 

R4.RS 

HX8 

3»HXER8 

LDCOF 



NOV 8200^4 
LDFPS R4 

•HXPl.RO 
(RO),ACO 

•HXP2.R0 
»HX9,2«STNP2 



;IS RO CORRECT 



;GET FPS 
;GET ACO 

;SEE IF RESULT IS 
; CORRECT 



;DID FD GET 
; COHPL I RENTED' 



;FPS CORRECT' 



;SET UP THE LOOP ON ERROR ADDRESS 



104 



nfiltCCC-ll-DfFPB-A POP 11 34 FPP DIAGNOSTIC PART 2 MACY11 27 ( 100b ) 

DfTPBA.Pli 01-N0V-76 2i:Cb T3 LDCFC AND LDCDF TEST 



2511 
2512 
2513 
2514 
2515 
251b 
2517 
251B 
2S1<3 
2520 

2523 
252M 
2525 
252b 
2527 
2529 
2S29 
2SX 
2531 
2532 
2533 
253M 
2535 
253b 
2537 
2538 
253S 
2540 
2541 
2542 
2543 
2544 
2545 
25% 
2547 
254fi 
254«3 
2550 
2551 
2552 
2553 
2554 
2555 
255b 

file 

255S 
25b0 
25S1 
25b2 
25b3 
25b4 
2555 
25bb 



012072 177420 



01207M 
012100 
012102 

01210b 
012106 
012110 
012114 
01211b 
012120 
012124 
012130 
012132 

012134 
012140 
012144 
012150 
012152 
012154 
0121b0 
0l21b2 



012170 
012174 
01217b 
012200 



012204 
012204 

01220b 
012212 
012214 
012222 
0122X 
012232 
01223b 
012240 

8i§§8 

012252 
01225b 
012250 

0i22b4 
0122b4 

0122bb 



020027 
001402 
000137 



170205 
012700 
170011 
174010 
012701 
012702 
022120 
001415 

012701 
012700 
012702 
022110 
001402 
000137 
077205 
000137 



0121bb 077220 



012704 
020405 
001402 
000137 



104413 

012704 
170104 
012737 
012737 
005001 
177427 
005201 
005201 



)1 

020127 
001402 
000137 



104413 
012704 



013334 
012712 

013304 



013404 
000004 



013374 
013304 
000004 



01304b 
01307b 

300000 
013030 



HX<3: 



HX10: 



LDCDF (RO)+,ACO 



HX11: 

HX12: 
HX13: 
HX14: 



CMP 
9E0 
JNP 



STFPS 
NOV 

"TO 

MOV 
NOV 
CliP 
BEQ 

NOV 
NOV 
MOV 
CMP 
BEQ 
JMP 
SOB 
JMP 

SOS 

NOV 
CMP 
BEQ 
JMP 



R0.IHXP2+10 

HXlO 

SIHXER5 



R5 

•HXDATO.RO 

ACO.(RO) 
•HXP8.R1 
•4.R2 

(Rlw,(RO) + 
HX14 

•HXP7.R1 

•HXDATO.RO 

•4.R2 

(Rl)+,CRO) 

HX13 

atHXERb 

R2.HX12 

3tHXER7 

R2.HX11 

•0,R4 
R4 R5 
HXlS 
3SHXER8 
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;TEST INSTRUCTION 

;UAS A GOOD 
; CONSTANT USED 
TO INCREMENT RO' 



;GET RESULT 
;IS IT CORRECT 



;DID FD FAIL TO GET 
; COMPLIMENTED' 



;FPS CORRECT 7 



;TEST GR7 IMMEDIATE NODE CONSTANT 
HXlS: 



000200 

012232 00123b 
01312b 000004 

043243 



03bb4b 000004 
000003 

0131b2 



HXlb: 
HXlbS: 



HX17: 



000200 



LPERR 

NOV 

LDFPS 

NOV 

MOV 

CLR 

LDCFD 

INC 

INC 

INC 

NOV 

CNP 

BEQ 

JMP 



LPERR 

MOV 



•200, R4 
R4 

•HXlb.3»STNP2 
•HXER4,3«ERRVECT 
Rl 

15201, ACO 

Rl 

Rl 

•£>SPUR,3«ERRVECT 

R1.I3 :SEE IF PC UAS 

HXl7 ; CORRECT 

3IHXER10 



;SET UP THE LOOP ON ERROR ADDRESS 
;SET FO 



;SET UP THE LOOP ON ERROR AOORESS 



•200, R4 



J04 



NhllOEC-l.-DFFPB-A PDF 11 34 FPP DIAGNOSTIC PART 2 HACY11 27U006) 

DF'PBA.Pi: Cl-NCV-rfc 21:26 T3 lDCFC AND LDCDF TEST 



01-N0V-76 21:12 PACE 48 



2S67 
£568 
2569 
2S7C 

2573 
2574 
2S75 
2S7fa 
2577 
2S78 
2579 
2S8C 
2581 
2SB2 
2583 
2584 
2S8S 
2536 
2587 
2588 
2589 
2590 
2S91 
2592 
2S93 
2594 
2595 
25% 
2597 
2598 
2599 
2500 
2501 
2502 
2503 
2604 
2505 
2506 
2507 
2508 
2509 
2610 
2511 
2512 
2613 
2614 
2615 
2616 
2617 
2618 
2619 
2620 
2621 
2622 



CI 2272 
012274 

012302 
012306 

312322 

01232M 
012230 
012332 
012336 
012342 
012344 
C12346 
012352 



012354 
C123S4 
012356 
012362 
012364 
012372 
012376 
212400 
012404 

012406 
012412 

012414 
012420 
012424 
012426 

012430 
012434 
012440 
012444 
0124% 
012450 
012454 
012456 

012462 



012464 



170104 
012737 
012700 
172410 

SIIto'o 

177410 

012700 
174010 
012701 
012702 
022021 
001402 
000137 
077205 



012322 
013364 

*b 



001236 
000004 



013304 

013374 
000004 



012~32 



HXIB: 



HX19: 



HX20: 

: TEST 
HX21: 



LDFPS 

HOV 

HOV 

LDD 

MOV 

NOV 

LDCFD 

NOV 
STD 
NOV 
NOV 
CNP 
BEQ 
JNP 
SOB 



R4 

•HXl8,atSTNP2 

•HXP6.R0 

(RO).ACO 

•CPSPUR.StERRVECT 
•HXP2.R0 

(RO).ACG 

•HXDATQ.RO 
ACO.(R05 
•HXP7,Ri 
•4.R2 

(RO)*, (RD* 
HX20 
9tHXER2 
R2.HX19 



;GET RESULT. 
:IS RESULT CORREC T ' 



.DCFD WITH NEGATIVE OPERANO 



104413 






LPERR 


U 1 c/Ln 


IJuUcUu 




MAW 

nuv 


173104 






LDFPS 


01273^ 


012404 


001236 


HOV 


012700 


013364 




NOV 


172410 






LDO 


Ulc7UU 


Ul JjHS 




nuv 


177410 




HX22: 


LDCFD 


0127X 


013304 




NOV 


174010 






STD 


012701 


013354 




NOV 


012702 


000004 




HOV 


022120 




HX23: 


CNP 


00141S 






BEQ 


012701 


013374 




HOV 


012700 


013304 




HOV 


012702 


000004 




HOV 


022120 




HX24: 


CHP 


001402 






BEQ 


000137 


013214 




JNP 


077205 




HX25: 


SOB 


000137 


013234 




JNP 


077220 




HX26: 


SOB 






;TEST 


LDCFD 






HX27: 




104413 






LPERR 


012704 


000200 




HOV 


170104 






LDFPS 


012700 


013314 




HOV 


172410 






LDD 



•200, R4 
R4 

•HX22,g(J$THP2 

•HXr5.R0 

(RC).ACO 

•HXP4.R0 

(RO),AC0 

•HXDATO.RO 
AC0,(RO} 

•HXPS.Rl 
•4.R2 

(RlH,(RO)+ 
HX26 

•HXP7.R1 

•HXDATO.RO 

•4.R2 

(RlH,(RO)* 

HX2S 

asHXERll 

R2.HX2M 

SSHXER12 

R2.HX23 

0 



•200, R4 
R4 

•HXP1.R0 

(RO).ACO 



;SET UP T H£ LOOP ON ERROR ADDPE55 



;GET RESULT 



;UAS SIGN INCORRECT 



;SET UP THE LOOP ON ERROR ADDRESS 



•WOEC-ll-D^PB-fl POP 11 
DFFPBA.P11 01-N0V-76 21:2b 



2623 
2624 
2625 
2626 
2627 



C12S02 172010 



012504 
012512 
012516 



012737 
012700 
177410 



012520 170205 



34 FPP DIAGNOSTIC PART 
T3 LOCFC 

flDDD 



01251b 
013314 



2630 








2531 


012522 


012700 


CI 3304 


2532 


012526 


174010 




2533 








253M 


012530 


012701 


013314 


2535 


01253M 


012702 


000004 


2535 


012540 


022120 




2537 


012542 


001402 




2538 


012S44 


000137 


013264 


2639 


012550 


077205 




2640 








2641 


012552 


012704 


000204 


2642 


012556 


020405 




2643 


012560 


001402 




2644 


012562 


0O0137 


013012 


2645 








25% 








2647 








2646 


012566 






2649 


012566 


104413 




2650 


012S70 


012704 


« ******* « 

000200 


2651 


012574 


170104 




2652 








2653 


012576 


012700 


013364 


2654 


012602 


172410 




2655 








2656 


012604 


CI 2737 


012blb 


2657 


012612 


012700 


013314 


2658 


01261b 


177410 




265S 








2660 


012620 


170205 




2661 








cbbc 


ulcbcc 


UlcfuU 


111 J Jin 


2663 


012626 


174010 




2664 








2665 


012630 


012701 


013314 


2666 


012634 


012702 


000004 


2667 


012640 


022120 




2668 


012642 


001402 






012644 


000137 


0132b4 


2570 


012650 


077205 




2671 








2672 


012652 


012704 


000204 


2673 


012656 


020405 




2674 


012560 


001402 




2675 


012662 


000137 


013012 


2676 


012666 


000137 


013414 


2677 








2b7e 









00123b 



HX28: 



HX29: 
HX30: 



:TEST 
HX31: 



00123b 



HX32: 



K04 

2 MftCYll 27 (100b) 
AND LDCDF TEST 

(R0),AC0 

MOV •HX28,ai$TMP£ 

MOV IHXP1.R0 

LDCFD (R0).AC0 

STFPS R5 

MOV IHXDAT0.R0 

STD AC0,(R0) 

MOV IHXP1.R1 

MOV I4.R2 

CMP (Rl) + ,(R0H 

BEG HX30 

JMP 31HXER13 

SOB R2,HX2S 

MOV I204.R4 

CMP R4.RS 

BEQ HX31 

JMP 3IHXER4 

LOCFO 0 



LPERR 

MOV 1200^4 

LDFPS R4 

MOV IHXP6.R0 

LOO (ROi.ACO 

MOV •HX32,3t$TMP2 

MOV iHXPl.RO 

LDCFD (R0),AC0 

STFPS RS 
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MOV 
STD 

MOV 
MOV 

HX33: CMP 
BEQ 
JMP 

HX34: SOB 

MOV 
CMP 
BEQ 
JMP 

HX35: JMP 
;R0 INCORRECT 



•HXDATO.RQ 
ACO, (R05 

•HXP1.R1 
fc4,R2 

(R1)*,(R0H 
HX34 

9IHXER13 
R2.HX33 

•204.R4 

R4.R5 

HX35 

9IHXER4 

StHXDONE 



;GET RESULT 



;IS IT 0' 



;FPS CORRECT 



; SET UP THE LOOP ON ERROR RCORESS. 



;GET RESULT 
:IS IT ZERO* 

;FPS CORRECT' 



L04 



iMirCCC-li-OFFPS-H POP I! 34 FPP DIAGNOSTIC PART 2 MACY11 27( lOOfei Ol-NOV-76 21:12 PAGE 5C 

D^PBh.PH Ol-NOV-76 21:C6 T3 LDCFC AND LDCDF TEST 



2673 
2680 
2681 
2682 
2683 
2684 



2687 
2686 
2683 
2630 

2691 
263? 
2633 
263M 
2635 
26% 
2637 



012672 
012700 
012704 
012706 

SiF 1 

012724 
012726 

012732 
012740 
0127% 
01275M 
012756 



2700 
2701 
2702 

m 

2705 
2706 
2707 
2708 
2703 
2710 
2711 
2712 
2713 
271M 
2715 
2716 
2717 
2718 
2713 
2720 
2721 
2722 
2723 
2724 
2725 
2726 
2727 
2728 
2723 
27X 
2731 
2732 
2733 
2734 



012762 
012770 

ir 76 

013006 



>38 012776 
j33 013004 



013012 

im 

013024 

013030 
013034 
013040 
013042 
0130% 
013054 
013062 
013070 
013072 

013076 
013104 
013112 
013120 
013122 

013126 
013132 
013134 
013140 
013142 

0131% 
013152 
013154 
013156 



012737 
010037 
104234 
000137 

8l003*7 
104237 
000137 

012737 
012737 
012737 
104233 
000137 

012737 
012737 
012737 
104241 
000137 

010537 
010437 
104240 
000137 

010537 
010437 
104242 
000137 
012737 
012737 
012737 
104244 
000137 

012737 
012737 
012737 
104243 
000137 

032716 
001005 
02271b 
001402 
000137 

011b37 
022626 
104235 
000137 



013162 162701 



013330 
OC1240 

013414 

013414 

013324 
013374 
013304 

013414 

013324 
013374 
013304 

013414 

001240 
001242 

013414 

001240 
001242 

013414 
013324 
013404 
013304 

013414 

013324 
013404 
013304 

013414 

000001 

012236 

036646 

001236 

013414 
000003 



001242 



001242 



001244 
001250 
001246 



001244 
001250 
001246 



001244 
001250 
001246 



001244 
001250 
001246 



HXER1: 
IS: 

HXER5: 
II: 

: REPORT 
HXER2: 

HXER22: 
IS: 

&XER3: 

HXER33: 
IS: 

HXER4: 
IS: 

HXER8: 
IS: 

HXER6: 

HXER66: 
IS: 

PXER7: 
IS: 

HXER3: 



IS: 
2S: 



MOV 
MOV 
ERROR 
JMP 



•HXP2+4. 3ISTMP4 

R0,aiSTMP3 

234 

3IHXD0NE 



■HXP2+J0^liTHP4 



MOV 

MOV RO.aiS 
ERROR 237 
JMP 3IHXD0NE 
BAD DATA 

MOV . IHXP2.3ISTMP5 
MOV " IHXP7.3ISTMP7 
MOV lHXDAt0,aiSTMP6 
ERROR 233 
JMP 3IHXD0NE 



MOV 

MOV 

MOV 

ERROR 

JMP 

MOV 
MOV 
ERROR 
JMP 

MOV 

MOV 

ERROR 

JMP 

MOV 

MOV 

MOV 

ERROR 

JMP 

MOV 

MOV 

MOV 

ERROR 

JMP 

BIT 
BNE 
CMP 
BEQ 
JMP 

MOV 
CMP 
ERROR 
JMP 



HXER10: SUB 



!HXP2,aiSTMP5 
IHXP7.3ISTMP7 
lHXDAT0,3lSTMP6 

241 

3IHXD0NE 

P5,aiSTMP3 
R4.3ISTMP4 

240 

3IHXD0NE 

R5,atSTMP3 
R4.atSTHP4 

242 

atHXOONE 

•HXP2,atiTHP5 

•HXP8131STMP7 

■HXDAT0,3tSTMP6 

244 

StHXOONE 
•HXP2,3HTf*>5 

•Hxpe!aiSTMP7 

•HX0AT0,3flTf1P6 
243 

31HXD0NE 

•1,(SP) 
IS 

•HX165, (SP) 
IS 

3ICPSPUR 

(SP),3ISTMP2 

(SP)*,(SP)+ 
235 

3IHX00NE 
•3, PI 



;SEE IF IT 

;AN ODD AODRESS 



MOM 



*1hINOEC-11-DFFPB-A POP 11 34 FPP DIAGNOSTIC PORT 2 NACY11 27(100b) 01-N0V-7b 21:12 PPGE 51 

DCFPBfi.Pll Ol-NOV-rb 21:Cb T3 LDCFC AND LDCDF TEST 



273S 


C13'.bb 


00b301 






273b 


013170 


012702 


01223b 




2737 


013174 


010237 


001242 




2738 


013200 


Ib0l02 






2739 




010237 


A A • AllA 

001240 




27M0 


013^202 


10423b 






27M1 


013210 


AAA 1 "JA 

000137 


013414 




27M2 










27M3 


013214 


012737 


013344 


AA 1 ftl lil 

001244 


27HM 


013222 


012/37 


013354 


AA • APA 

001250 


2745 


013230 


aaa • 

000137 


A • AAllf 

0127% 




27% 


013234 


012737 


013344 


001244 


27M7 


013242 


012737 


013354 


a a i irp 

001250 


27M8 


013250 


012737 


013304 


AA 1 Allf 

00124b 


2749 


ft 4 ^"^f 

01325b 


104245 






2750 


ft i a 

0132b0 


000137 


A 1 Aj ill] 

013414 




2751 










a a 

2752 


ft 1 1 1 

0132b4 


A 1 Af 

012737 


013314 


A A • Ajiij 

001244 


a^«^ a 

2753 


013272 


012737 


013314 


ftft 1 ^f"ft 

001250 


2754 


ft i 

013300 


AAA • 

000137 


a * A"">nr 

01274b 




2755 










275b 


013304 


AAAAAA 

000000 






2757 


01330b 


AAAAAA 

000000 






^"*ap*a 

2758 


ft a ft^ ■ ft 

013310 


AAAAAA 

oocooo 






2759 


ft i ft^. i ^ 

013312 


000000 






2750 










27b 1 


ft 1 T> 1 II 

013314 


□00000 






27b2 


01331b 


000000 






27b3 


ft 1 *^1*V1 

013320 


AAAAAA 

000000 






27b4 


ft ■ a aaa 

013322 


000000 






27b5 










A*»r r 

27bb 


013324 


AAAftT 

000577 






27b7 


n i a a *v 

01332b 


17777b 






27b8 


J 13330 


\f f f f f 






27b "3 


013332 


17777b 






2770 


013334 


AAPAA a 

005201 






aa^ t 

2771 


ft i ^ft;ft# 

01333b 


AAAAAA 

000000 






2772 


013340 


000000 






2773 


013342 


AAAAAA 

000000 






277H 


ft i i^tiij 

013344 


11 j577 






2775 


ft i if 

0133% 


17777b 






c77b 


A « ^Vfl 

UldJbU 


1 ^^^^^ 

177777 






2777 


013352 


17777b 






c77B 


013354 


i 00577 






2779 


01335b 


17777b 






27B0 


U133B0 


000000 






37Q1 
CI ok 




normnn 
UUULKJU 






2782 


0133b4 


000252 






2783 


0133bb 


125252 






2784 


013370 


125252 






2785 


013372 


12S252 






278b 










2787 


013374 


000577 






2788 


01337b 


17777b 






2789 


013400 


000000 






279C 


013402 


000000 







II: 



ASL 

MOV 

MOV 

SUB 

MQV 

ERROR 

JMP 



HXER11: NOV 
10V 
JMP 

HXER12: NOV 
MOV 
MOV 

IS: ERROR 
JMP 

HXER13: MOV 
MOV 
JMP 

HXDflTO: 0 
0 
0 
0 



HXP1: 

HXP2: 
HXP3: 
HXP4: 
HXP5: 
HXPb: 

HXP7: 



0 
0 
0 
0 

577 

17777b 

177777 

17777b 

5201 

0 

0 

0 

100577 

\7777b 

177777 

17777b 

100577 

17777b 

0 

0 

252 
125252 
125252 
125252 

577 
17777b 
0 
0 



Rl 

■HXlb5,R2 
R2,ai$tMP4 

R1.R2 

R2I3ISTMP3 
23b 

atHXDONE 

•HXP4,aiSTMP5 

•HXP5!aiSTMP7 

3tHXER22 

•HXP4,atSTMPS 

•HXPS!atSTMP7 

•HXOfltO.aiSTMPb 

245 

atHXDONE 

•HXPl.atSTMPS 
•HXP1.31STMP7 
3tHXER22 



NQ4 
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27*31 


013404 


000577 


2732 


01340b 


177777 


2733 


ft 1 ft 

013H10 


oooouo 


2794 


013412 


000000 


2735 






27% 


013414 




ItS 
c7td 


013414 


104412 


2800 
2801 






2802 






2803 






2f OH 






2b > 












2807 






2808 






2809 






2810 






2811 






2812 






2813 






2814 


ft i ""m j t r 

01341b 


ftftftftftt i 

000004 


2815 






281b 






2817 


013420 




2818 


ft 1 "VI'Vl 

013420 


10M413 


2819 


013422 


004737 


2820 


01342b 


000000 


2821 


013434 


ftftftftftft 

000000 


2822 


013436 


ftftftftftft 

000000 


2823 


013444 


ftftftftftft 

000000 


2824 


r 13446 


nnft^ftft 

000200 


2825 


J 134 50 


000204 


282b 


013452 


000200 


2827 


013454 


104001 


CD CD 






2823 






2830 






CDJl 


013456 




CMC 


□lJMbb 


104413 


CO Jo 


OlJMbU 


004737 


2834 


n i Tut u 

013464 


000000 


2835 


013472 


000000 


code 




025252 


pQ-57 

COO' 




U3C3C3 


2838 


013500 


125252 


2839 


013502 


052525 


2840 


013504 


000200 


2841 


013506 


000200 


2842 


013510 


000210 


2843 


013512 


104003 


2844 






2845 






284b 


013514 





014232 
000000 

000000 



000000 

nooooc 



014232 
000000 



000000 



HXP8: 



HXDONE: 



577 
177777 
0 
0 



RSETUP 



GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SQFTUARE 
VIRTUAL CONSOLE SUITCH REGISTER (HAS 
THE USER TYPED C0N"R0L G 7 ) . 



4TEST 4 CNPO TEST 

*THIS IS A TEST OF THE CMPD INSTRUCTION. NOTE THAT A SUBROUTINE 
MS USED TO SET UP OPERANDS, EXECUTE THE INSTRUCTION AND CHECK THE 
♦RESULTS 
# 

TST4: SCOPE 



;TEST THE CMPD INSTRUCTION WITH (FSRC=AC=0) 
AAA1: 



IS 
25 
35 

4$: 



LPERR 

JSR 

.UORD 



PC.atCMPSUB 
0,0,0,0 



.U0R0 0,0,0,0 

200 
204 
200 

ERROR 1 



;SET UP THE LOOP ON ERROR ADDRESS. 
;AC0 
;FSRC 

;FPS BEFORE EXECUTION 
;FPS AFTER EXECUTION 
ERROR FPS 
;FPS ERROR 



:TEST CMPD WITH (AC=0) AND FSRC POSITIVE. 
HAA2- 

LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 

JSR PC.3ICNPSUB 
.WORD 0,0,0,0 ;AC 



IS: 
2S: 

35: 
4S: 



25252 

52525 

125252 

52525 

200 

200 

210 

ERROR 



;FSRC 



;FPS BEFORE EXECUTION 
FPS AFTER EVECUTION 
ERROR FPS 

;FPS ERROR 



; TEST CMPD WITH (AC=0) AND FSRC NEGATIVE 
A A A3: 



B05 



:«°bs.fi: c:-icv-7fc 2:: 06 



24 TPP DIAGNOSTIC PART 2 HflCYil 27(1006) 
T4 C1PD TEST 



2947 

2SN8 

2949 

29SC 

2951 

3952 

2953 

2954 

2955 

2956 

2957 

2956 

295"? 

2963 

2961 

?962 

2963 

2964 

29b5 

2966 

2967 

2968 

2969 

2970 

2671 

2972 

2973 

2974 

2875 

2976 

2977 

2978 

297*3 

2980 

2981 

2982 

2983 

2984 

2985 

2886 



:iZc 



213514 
013516 
013522 
013530 
Q13S32 
013534 
013536 
013540 
013542 
013544 

013546 
013550 



013552 
013552 
013554 
013560 
01356c 
013564 
013566 
C13570 
013576 
013600 
013602 
013604 
013606 



013610 
01361C 
013612 
013616 
013620 
013622 
013624 

oi: 
oi; 

013636 
013640 
013642 
013644 



013646 
0136% 
013650 
013654 
C13656 
013660 
013662 
013664 
013666 
213670 
213672 



104413 

304737 2H232 

oooooc oooocc 

000000 
125252 
125252 
052525 
12S2S2 
000200 
000212 
00020C 
134004 



104413 

004737 014232 



125252 
052525 

003000 000000 

000000 

000200 

000210 

000200 

104005 



OOOOOC II: 
21: 

31: 
41: 



LPERR 

JSR PC.StCHPSUB 
.WORD 0.0.0.0 

125252 

125252 

52525 

125252 

200 

210 

200 

ERROR 4 
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;SET UP THE LOOP CN E*POR ACD»>ESS 
;AC 
:FSRC 



FP5 BEFORE EXECUTION 
FP5 AFTER EXECUTION 
ERROR FPS 
FPS ERROR. 



IS: 

OOOOOC 21: 
31: 

41: 



:TEST CNPD UITH (FSRC=0> AND AC POSITIVE 
AAA4- 

LPERR ;SET UP THE LOOP ON ERROR ADDRESS 

JSR pc.atcnpsue 

;AC 



125252 
52525 

.WORD 0.0,0.0 

200 
210 
200 

ERROR 5 



;FSRC 

;FPS BEFORE EXECUTION 
;FPS AFTER EXECUTION 
; ERROR FPS 
;FPS ERROR 



104413 
004737 
125252 
125252 
052525 
125252 



000200 



014232 



OOOOOC 



II 

104006 



104413 
004737 
052525 
125252 
052525 
125252 
125252 
052525 
125252 
052525 



OCCOOO 21: 
31: 

41: 



:TEST CffD UITH (FSRC=0) AND AC NEGATIVE 
AAA5* 

LPERR ;SET UP THE LCOP ON ERROR ADDRESS 

jsr pc.atcnpsue 

'I: 125252 ;AC 
125252 
52525 
125252 

•WORD 0.0.0.0 ;FSRC 



200 



ERROR 



;FPS BEFORE EXECUTION 
;FPS AFTER EXECUTION 
: ERROR FPS 
;FPS ERROR 



D 14232 



:TEST CMPO UITH AC POSITIVE AND FSRC NEGATIVE 

LPERR ;SET UP THE LOOP ON ERROR ADDRESS 

JSR PC, 2 tCflPSUB 
II: 52525 :AC 
125252 
5252S 
125252 

21: 125252 ;:FSRC 
52525 
125252 
5252S 



C05 



23C3 



3-4 FPe DIAtfWSTIC.PJRT^ PWCY11 27(1006) 01-N0V-76 21:12 PAGE 54 



013674 
013702 



30020C 

in 



1040C? 



3$: 



4S: 



cnpo ti 

200 

Sft8 

ERROR 



FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
ERROR FPS 
FPS ERROR 



2327 
2328 
2323 
2330 
2331 
2332 
2333 
2334 
233S 
2336 
2337 
2336 
2333 
2340 
2341 
2342 
2343 
2344 



2347 
2346 
2343 
2350 
23S1 
2352 
2353 
2354 
2355 
2356 
2357 
235e 



013704 
013704 
CI3706 
013712 
013714 
01371b 
013720 
013722 
013724 
01 3725 
013730 

813734 
013736 
CI 3740 



013742 
013742 
ni3744 
013750 
013752 
013754 
01375b 
013750 
013752 
013754 
01375b 
013770 
013772 
013774 
01377b 



014000 
014000 
014002 
014006 
014010 
014012 
014014 
01401b 
014020 
014022 
014024 
01402b 
014030 



104413 

004737 014232 

125252 

052525 

125252 

052525 



052525 
125252 



: TEST CNPO WITH AC NEGATIVE AND 
AAA7: 



000210 
10*010 



104413 

004737 01423c 

012345 

057554 

332101 

02345b 

02345b 

075543 

021012 

034557 

000200 

000200 

000210 

104011 



104413 

004737 014232 

045575 

054321 

012345 

057554 

034557 

055432 

101234 

055755 

000200 

000210 



IS: 



2S: 



31: 



4S: 



LPERR 
JSR 

125252 

52525 

125252 

52525 

5252S 

125252 

52525 

125252 



pc.atCNPSuB 



FSRC POSITIVE 

;SET UP THE LOOP ON ERROR ADDRESS. 
;AC 



;FSRC 



210 
ERROR 



10 



BEFORE EXECUTION 
AFTER EXECUTION 



FF 
FF 

ERROR FP3 
FPS ERROR. 



;TEST CNPO UITH AC POSITIVE AND FSRC POSITIVE 
:AND EAC LESS THAN EFSRC. 



2S: 



3S: 



4$: 



LPERR 
JSR 
12345 
67554 

i§& 

23456 

76543 

21012 

34567 

200 

200 

210 

ERROR 



PC.atCNPSUB 



11 



;SET UP THE LOOP ON ERROR ADDRESS. 
;AC 

;FSRC 



;FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
ERROR FPS 

;FPS ERROR 



:JEST CNPO UITH AC POSITIVE, FSRC POSITIVE AND EAC GREATER THAN EFSRC 

;SET UP THE LOOP ON ERROR ADDRESS. 
;AC 



LPERR 

JSR PC.atCNPSUB 
IS: 45676 

54321 

12345 

67554 
2S: 34567 

65432 

101234 

S676S 
3S: 200 

210 



;FSRC 



:FPS BEFORE EXECUTION 
;FPS AFTER EXECUTION 



D05 



24 rpp DIAGNOSTIC PAR T , 
*4 CflPC T| 



» n«Cfll 27(1006) 



01-NOV-76 21: 



2362 
i3 
>4 
2%5 
2366 
2367 
2%8 
2369 
2S7C 
2371 
2372 
2373 
2374 
2375 
2376 
2377 
237S 
2373 
2360 

2sei 

2382 
2SB3 
2384 



2387 
2388 
2383 
2330 
2331 
2932 
2333 
233M 
2395 
23% 
2937 
2338 
233S 

3O0C 
onn < 

3002 
3003 
3004 
3005 
3006 
3007 
3006 
3003 
3C1G 
3011 
3012 



2 



ei: 

314040 
01' 

1' 

014052 
OIHOSM 

oi4oSf> 

014060 
014062 
014064 
014066 

014070 
014072 



014074 
014074 
014076 
0141Q2 
014104 
014106 
014110 
014112 
014114 
014116 
014120 
014122 
014124 
014125 
014130 



21H132 
014132 
CH13M 
014140 
014142 
0141H4 
0141% 
014150 
014152 
014154 

014156 
014150 
314152 
014154 
014155 



104413 
004737 
012345 

m 

012345 
012345 
067012 
034567 
012345 
000200 
000204 
000200 
104013 



104413 
004737 
012345 
067012 
034567 
012345 
012345 
070123 
045670 
123455 
000200 
000200 
000210 
104014 



104413 
004737 

05H321 
075543 
021075 
054321 
054321 
065432 
107654 
032107 
000200 
000210 
000200 
104015 



314232 



014232 



; M232 



4|: 



OR 12 



; ERROR F*S 



: T ES T CHPO WITH AC POSITIVE, 
ktf 10: 

IPERR 

jsr pc.aicnpsue 

11: 12345 
67Q12 
34567 
012345 
12345 
67012 
34567 
012345 
200 
204 
200 
ERROR 



2S 



3S 



41: 



13 



; TEST CNPO WITH AC POSITIVE. 
•ANC FSRC GREATER THAN AC. 
AAA11: 

LPERR 

JSR PC.aiCHPSUB 
12345 
67012 
34567 
012345 
12345 
70123 
45670 
123455 
200 
200 
210 
ERROR 



1$: 



2S: 



3$ 



41 



14 



; TEST . Zm>_ WITH AC . POg|TJ VE , 



:ANO AC GREATER THfiM 

tol2: 

LPERR 
JSR 

IS: 54321 
76543 
21076 
54321 
21: 54321 
65432 
107654 
32107 



pc.sicnpsue 



3$: 



41: 



!10 
200 
ERROR 



15 



FSRC POSITIVE ANC AC EwLhl *C FSP1 
;SET UP T HE .OOP ON E«ROfl hOO©E; 
:AC 

:FSPC 



FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
ERROR FPS 
FPS ERROR 



rSRC POSITIVE. EAC EQUAL TC EFSRC. 

: SET UP THE LOOP ON ERROR ADORE: 
;AC 

:FSRC 



FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
ERROR FPS 
FPS ERROR 



FSRC POSITIVE. EAC EQUAL TO EFSRC. 

; SET UP THE LOOP ON ERROR ADDRESS 
;AC 

:FSRC 



FPS BEFORE EXECUTION 
CPS AFTER EXECUTION 
ERROR FPS 
FPS ERROR 



EOS 



*»inoe:-ii-d**pb-» 
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30IS 
301b 
X17 
3011 



3021 
3022 

302S 
3026 
3027 
3028 



3031 
3032 
3033 
303M 
3035 
3036 
3037 
3038 
3039 
3040 
3041 
3042 
3043 
3044 
3045 
30% 
3047 
3048 
3049 
3050 
3051 
3052 
3053 
54 



305b 
3057 
3058 
3059 
3060 
3061 
3062 
3063 
3064 
3065 
3066 
3067 
3068 
3069 
2072 



014170 
014170 
014172 
014176 
014200 
014202 

aias 

014210 
014212 
014214 
014216 
014220 
014222 
014224 



*7l 
112345 
043210 
076543 

nm 

054321 
007654 
032107 
00020C 
10 



104016 



014232 



014226 000137 014422 



014232 012601 

014234 OlblOO 000020 

014240 170100 

014242 012737 014264 

0142S0 010100 

0142S2 172410 

014254 Q10100 

01425b 062700 000010 



00 1236 



:TEST CNPD UITH AC NEGATIVE, FSRC NEGATIVE. EAC EOLh. '0 EFSRC. 

:ANO AC GREATER THAN FSRC 

AAA13' 

LPERR ;SET JP THE LOOP ON ERROR ADDRESS. 

JSR PC.atCMPSJB 
II: 112345 
43210 
76543 



21: 

31: 
41: 



2107b 
112345 
54321 
07bS4 
32107 
200 

ERROR 



JHP 



;AC 
;FSRC 



FPS BEFORE EXECUTION 



AFTER EXECUTION 



PS AFTER 
RROR FPS 
FPS ERROR 



31AAAD0NE 



; FINISHED CNPD TEST. 



THIS SUBROUTINE. CNPSUB. IS CALLED TO SET JP, EXECUTE 
AND CHECK THE RESULTS OF A CNPD INSTRUCTION. 
IT IS CALLED THUS: 



ACARG: 

FSRCARG 

FPS8: 

FPSA: 

FPSE: 

ERR: 

CONT: 



JSR 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

ERROR 



Pc.atcnPSUB 

X f X i X ^ X 

X i X ^ X f X 

X 

X 

X 

X 



AC OPERAND 

FSRC OPERAND 

FPS BEFORE EXEOTICN 

FPS AFTER EXECUTION 

ERROR FPS 

FPS ERROR 

RETURN ADDRESS 



THE OPERANOS ARE SET UP (USING ACO FOR THE AC OPERAND). THEN 
THEN THERE WAS NO ERROR AfC CONTROL IS RETURNED TO CONT. IF 

IS KWfH 1! WSSR BTWRJ SMHPE T0 ^ VSE 

RETURNED TO THE ERROR CALL AT LOCATION ERR. IF THE FPS WAS 
NOT CORRECT BUT DIDN'T NATCH FPSE A GENERAL ERROR IS REPORTED 
AND CONTROL IS PASSED TO CONT. 



CflPSUB: NOV 

NOV 
LDFPS 

NOV 
NOV 
LDD 

NOV 
ADD 



(SPH.Rl 

20(R1),R0 
RO 

«ll.atlTNP2 

Rl.RO 
(R0),AC0 

Rl.RO 
•l6.R0 



;PICK UP A POINTER TO THE 
; ARGUMENTS. 

GET THE FPS BEFORE EXECUTION. 
;L0AO IT INTO THE FPS. 

;SAVE ADORE SS OF CNPD INSTRUCTION. 
GET ADDRESS OF AC OPERAND. 
;LCAD ACO OPERAND 

jCONPUTE FSRC OPERAND 
; ADDRESS 



FQ5 



■fciioec-ii-D^PB-a pdf :: 

DFCPBA.PK Oi-NGV-76 2i :Cb 
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3071 
3072 
3073 
3074 
307S 
3076 
3077 
3078 
3078 
3C8C 
3081 
3082 
3083 
308M 
3085 
3086 
3087 
3088 
3088 
3080 
3081 



014262 
014264 

014266 

014270 

014274 
C14300 
014304 
014312 
01431b 
014322 
014324 

014326 
014332 
014334 



0CO240 
173M1C 

170205 
016104 

818$ 

062737 
010537 
010437 
020405 
001410 

026105 
001003 
082701 



3084 


014340 


003111 


3085 






30% 






3087 


014342 


104001 


3088 


014344 


000411 


3088 






3100 


0143% 


012700 


3101 


014352 


174010 


3102 


014354 




3i03 


01435b 


m& 


3104 


014362 


001003 


3105 


014364 


31% 


01436b 


077303 


3107 






3108 


014370 


XOlbl 


"?108 






3110 


01437H 




3111 


CI 4374 


010137 


3112 


014400 


012737 


3113 


014406 


104002 


3114 


014410 


0007b7 


3115 






311b 

3117 


014412 


000000 


01442C 


000000 


3118 






3118 






3120 






3121 


014422 




3122 


C14422 


104412 


3123 






3124 






3125 






3l2fc 







000022 

SiSS 

000010 
001244 
0012% 



000024 



00002b 



014412 
000004 

000030 



0C1240 
014412 



IS: 



001242 



001242 



2S: 
3S: 

41: 

51: 
bS: 

71: 



NOP 

cupd 

STFPS 

nov 

MOV 

nov 

POO 

nov 
nov 
cup 

BEO 

cup 

BfC 
POO 
JHP 



ERROR 
BR 

nov 

STD 

nov 
nov 
cnp 

Bf€ 

SOB 

jnp 



nov 
nov 
ERROR 
BR 



(RO).ACO 
R5 

22(Rli.R4 

Ri:3tlTnP4 
•io.atSTnP4 

R5,it$TnP5 

R4,aaiTnpb 

R4.R5 
3S 



24(R1).R5 
21 

•26. Rl 

(Rl) 



1 

51 

•CHPTnP.RO 

PCO.(RO) 

!4$ 

(R2)+,(R0)* 
61 

R3.4S 

30(RD 



Rl,3t$TnP3 

■cnpTnp.atiTnP4 

5S 



;FOR SCOPING. 

; EXECUTE THE TEST INSTRUCT 3*. 

:SPVE FPS PFTER INSTRUCTION. 

;GET EXPECTED FPS. 

;IF INCORRECT SET JP FOP 

;PN ERROR CALL. 



;UPS FPS CORRECT 7 
; BRANCH IF YES. 



UPS THE FPS THE SPHE 

PS THE EXPECTED INC0RREC T FPS' 

BRANCH IF NO MPTCH. 



:IF THE EXPECTED INCORRECT 
;FPS MATCHED THE RESULTANT FPS 

; RETURN TO THE ERROR CPU 
;IN THE CPLLING ROUTINE. 

; OTHERWISE REPORT INC0RREC T ^PS 



;IF FPS UPS CORRECT rtPKE SJRE 
;PCO UPS NOT AFFECTED BY CflPC. 



; RETURN 

; REPORT PCO NODIFIEC BY CNPD 
; RETURN 



000000 CNPTflP: .WORD 0,0.0,0 



AAPDONE: 



RSETUP 



GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TC CHANGE THE SOFTWARE 
VIR'UAL CONSOLE SWITCH REGISTER i HfiS 
THE USER TYPED CONTROL G* ) . 



GOB 



014424 0XOO4 



014426 1C4413 
Q144X 012704 



014434 
014436 
014444 

014452 
014456 
014460 



170104 
012737 
012737 
012700 
172M10 
012701 



v:*c£:-::-d""°b-h 



3127 
3126 
3129 
31X 
3131 
3132 
3133 
3134 
313S 
3136 
3137 

im 

3IH0 
3141 
3142 
3143 
3144 
3145 
31% 
314? 
314fl 
3149 
3150 
3151 
3152 
3153 
3154 
3155 
3156 
3157 
3156 
3151 
316G 
3161 
3lfe2 
3163 
31b4 
31bS 
3166 
3167 

3170 
3171 
3172 
3173 
3174 
3175 
3176 
3177 
317B 
317S 
3180 
3161 



"C c 11 34 FPP DIWNOSTIC.P«RT.| fWCYll 271100b 1 01-N0V-7b 21:12 PAGE 55 



T4 



CNPC Tl 



014%4 174411 



014466 
014470 

014472 
014476 
014500 

014502 
014506 
014510 



014512 
014512 
014514 
014520 

014522 
014530 
014534 
014536 
014542 

014544 
0145% 

014550 
0 14554 



17C205 
170303 

012704 
020405 
001131 

012702 
020203 
XI 140 



104413 
012704 
170104 

012737 
012700 
172410 
012700 
174410 

170205 
170X3 

012704 
020405 



040200 



014700 00C244 
014464 00123b 
015104 

015104 



140204 
000004 



040200 



014542 X1236 
015114 

C15104 



14C200 



♦TEST 5 CIVD WITH (FSRCsO) ANO (BUT FCj TEST 

♦THIS IS ft TEST OF THE DIVO INSTRUCTION WITH ft 
*ZERO DIVISOR. THE CONDITION IS CHECKED WITH BOTH 
*TRAP ENABLED AND TRAPS DISABLEO. 
* 

•#*#*####**♦###»##**»**#*###*********##************************« 

tSTS: SCOPE 

: FIRST TEST DIVD WITH (FSRC=AC=Oj AND TRAPS DISABLED 



BBBO: 



BBB1: 



LPERR 
NOV •40200, R4 



LDFPS R4 

NOV iBBBERl.fllFPVECT 

nov iBeBi.aisTNP2 

NOV IBB8P1.R0 

LX (ROT.ACO 

NOV IBBBPI.RI 

DIVD (Rl).ACO 



STFPS 
STST 

NOV 
CMP 
BNE 

NOV 
CNP 
BNE 



R5 
R3 

•140204, R4 

R4,RS 

B86ER2 

14, R2 

SLJ 3 

B68ER3 



SET UP THE LOOP ON ERROR ADDRESS 
SET UP FPS 
WITH INTERRUPTS 
DISABLED. 

SET UP FOR ANY FP INTERRUPTS. 

SET UP ACO = 0 

FSRC = 0 

TEST INSTRUCTION 

GET FPS 
GET FEC 

EXPECTED FPS. 

IS FPS CORRECT. 

IF INCORRECT BRANCH. 

EXPECTED FEC. 

IS FEC CORRECT' 

IF INCORRECT BRANCH. 



• TEST DIVD WITH (FSRC*0) AND TRAPS DISABLED 
BB82: 



BBB3: 



LPERR 

NOV 

LDFPS 

NOV 
NOV 
LDD 
NOV 
DIVD 

STFPS 
STST 

NOV 
CNP 



•40200, R4 
R4 

•B8B3.3HTNP2 
•B8BP2.R0 

(RQ).ACO 
•BB8>1.R0 

(RO).ACO 

R5 
R3 

•140200. R4 
R4.R5 



;SET UP ACO OPERAND ^N0N ZERO) . 
;FSRC=0 



;GET FPS. 
IGET FEC. 



; IS FPS CORREC 



: EXPECTED FPS. 
iORRECT* 



HQS 



FrPBA.Pll 01-N;;-'b £ .Cfc 



31 83 

318b 
3187 
3186 
3199 
3190 
3191 
3192 
3193 
3194 
3195 
31% 
3197 
3199 
3199 
3200 
3201 
3202 
3203 
3204 
3205 
3206 
3207 
3208 
3209 
3210 
3211 
3212 
3213 
3214 
3215 
3216 
3217 
3218 
3219 
3220 
3221 
3222 
3223 
3224 
3225 
3226 
3227 
3228 
3229 
3230 
3231 
3232 
3233 
3234 
3235 
3236 
3237 
3238 



C14556 0C1132 

014560 012702 

014564 020203 

014566 Mllll 



01457C 

fttSB 

01457* 

0146M 
014606 
014612 

014614 
014622 

014626 
014630 

014632 

014634 



01464Q 
014642 

014646 
014650 
014652 



104413 
012704 
170104 

012737 
0127M 
172410 

012737 
0127M 

174410 
170003 

000502 

022716 



M1402 
M0137 

170205 
170303 
022626 



014654 
014660 
014662 



012704 
020405 
M1040 



014664 
014670 
014672 



012702 
020203 
M1047 



3^ FPP DIAGNOSTIC p APT 2 NACY11 27ilS06 
T5 DIVD WITH (FSRC=C) AID 



00.3200 



014626 
015114 



014634 
015104 



014630 



036614 



100200 
MM04 
014674 M0137 015124 



BNE 

MOV 
CUP 
BNE 



BBBER2 

IH.R2 
R2.R3 
BB6ER3 



01-N0V-76 21:.£ PhCE 
'BUT FDj t E5 t 

:IF INCORRECT BRfiN>. 

; EXPECTED FEC. 
;JAS FEC CORRECT " 
;IF INCORRECT BRANCH. 



•TEST DIVD WITH FSRC=0) AND T RAPS ENABLED 
9BBH; 



001236 



000244 



B9B5: 



BBB6: 



IS: 



LPERR 
NOV 
LDFPS 

NOV 
NOV 
LDD 

NOV 
NOV 

DIVD 
CFCC 

BR 

CNP 



BEG 
JNP 

STFPS 

STST 

CMP 

NOV 
CMP 
BfC 

MOV 
CMP 
BfC 

JMP 



•200. R4 
R4 

•BBB5.aiSTHP2 
•B88P2.R0 

(RO).ACO 

•BB86 i a«FPVECT 
•B88Pl.R0 

(RO).ACO 



BBBER4 
•B8B5+2.CSP) 



IS 

3»FPSPUR 

R5 
R3 

(SP)+,(SP)+ 

•100200. R4 

R4.R5 

BB8ER2 

•4,R2 



3lBBBD0r€ 



;SET UP THE LOOP ON ERROR ADDC£S: 
ISET UP FPS. TRAP ENABLED. 



;SET UP ACO OPERAND iNON ZERO,. 



:SET UP FOR THE EXPECTED INTEPRUP'. 
;FSRC=0 

; TEST INSTRUCTION (SHOULD RESJLT IN t &mF. 

;G0 REPORT FAILURE. NO TRAP. 

: TRAP TO HERE WHEN THE DIVISION BY 0 
; OCCURS. FIRST SEE IF THE ADDRESS Or 
;THE TRAP IS 2+THE ADDRESS OF THE 'EST 
;DIVD INSTRUCTION. 

;IF NOT THEN REPORT AN UNEXPECTED 
;FP TRAP. 
GET FPS. 
;GET FEC. 
j RESET THE STACK. 

; EXPECTED FPS. 

;IS FPS CORRECT' 

|IF INCORRECT BRANCH. 

; EXPECTED FEC. 

j IS FEC CORRECT' 

• IF INCORRECT BRANCH. 

; OTHERWISE GO TO NEXT TEST. 



TRAP HERE IF AN UNEXPECTED INTERRUPT OCCURS 



0147M 062737 000002 001236 BBBER1: ADD •2,S«STMP2 



014706 
014712 
014714 

014720 
014722 



021637 
M1402 
000137 

022626 
170303 



M1236 
036614 



IS: 



CMP (SP),3»STMP2 

BEO IS 

JMP 3«FPSPUP 

CMP (SP)+,(SP)+ 

STST R3 



SEE IF THE INTERRUPT OCCURRED 
DURING THE EXECUTION OF THE DIVD 
INSTRUCTION BEING TESTED. 



;IF NOT REPORT UNEXPECTED FP "RAP. 



; RESET THE STACK , 
;GET FEC. 



105 
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3239 
32*40 
3241 
3242 
32*43 
32*4*4 
3245 
32% 
32*47 

32MB 
3249 
3250 
3251 
32S2 
3253 
3254 
3255 

m 

3256 
3259 
3250 
3251 
32S2 
3263 
3254 
3255 
3255 
3257 
3256 
3269 
3270 
3271 
3272 
3273 
3274 
3275 
3275 
3277 
3278 
3279 
3280 
3281 
3282 
3283 
3284 
3285 
3285 
3287 
3288 
3289 
3290 
3291 
3292 
3292 
2294 



CI 4724 
014726 
014734 
014740 
014744 
014750 
014755 



014764 
014770 
014774 
015000 
015004 
015006 



015012 
015016 
015022 
015025 
015032 
015034 



C15040 
015042 
Q150H4 
015052 
015056 
015062 
015070 
015074 
015100 
015102 

015104 
015112 
015114 
015122 



015124 
015124 



170205 
012737 
010337 
010537 
010037 
012737 
104017 



000004 
001242 
001244 
0012SG 
140200 



014760 000137 015124 



010537 
010437 
010037 
010137 
104020 
000137 



010337 
010237 
010037 
010137 
104021 
000137 



170303 
170205 
□12737 
010337 
010537 
012737 
010037 
010137 
104022 
000410 

000000 
000000 
012345 
076543 



104412 



001242 
001244 
00124b 
301250 

315124 



001242 
001240 
001246 
001250 

015124 



000004 
001240 
001244 
100200 
001250 
001252 



000000 
054321 



001240 
00124b 



25: 



STFPS R5 

110V f4,SilTHP3 

MOV R3,3lSTNP4 

NOV R5,3fSTNP5 

10V RO. atSTNP7 

MOV 1140200, SfSTHPb 

ERROR 17 

J HP atBBBDONE 



:GET FPS. 

; EXPECTED FEC. 



: REPORT (BUT FD, FAILED RESULTING IN ft 
;UITH TRAPS DISABLED. 



REPORT FPS INCORRECT: 



BBBER2 



IS: 



NOV 
NOV 
NOV 
NOV 
ERROR 
JNP 



RS.aiSTNPM 
R4,aiITNP5 
RO.atSTHPb 
Rl,3tSTNP7 

20 

atBBBDONE 



REPORT FEC INCORRECT: 



BB8ER3 



IS: 



NOV 
NOV 
NOV 
NOV 
ERROR 
JNP 



R3.3ISTHP4 
R2,3tSTHP3 
RO.aiSTNPb 
RiatSTHP? 

21 

atBBBDONE 



001242 
001246 



000000 
02345b 



; REPORT NO TRAP OCCURREO AFTER TRYING TO DIVIDE 

:BY ZERO WITH ALL TRAPS ENABLED. 

BBBER4: STST R3 ;GET FEC. 

STFPS R5 ;GET FPS. 

NOV t4,3tfTHP4 

NOV R3 3HTHP3 

NOV RSlatSTNPS 

NOV llD02QG,3tSTWPfe 

NOV R0,ai$TNP7 

NOV Rl.atlTHPlO 
IS: ERROR 22 

BR B8800NE 



BBBP1 : 
BBBP2 : 

BBBDONE: 



.UORD 0.0,0,0 

.WORD 12345,54321,23456,76543 



RSETUP ;G0 INITIALIZE THE FPS AND STACK; AND 

SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER iHAS 
THE USER TYPtD CONTROL G"L 



************************************ **************************t 



JD5 



ois:2b dccod* 



3295 
32% 
3297 
3298 
32S9 
330C 
33C1 
3302 
33C3 
3304 
3305 
3306 
3307 
3308 
3309 
3310 
3311 
3312 
3313 
3314 
3315 
331b 

3318 
3319 
3320 
3321 
3322 
3323 
3324 
3325 
3326 
3327 
3328 
3329 
3330 
3331 
3332 
3333 
3334 
3335 
3336 
3337 
3338 
3339 
3340 
33M1 
3342 
3343 
3344 
3345 
33% 
3347 
3348 
3349 
335C 



015130 
015IX 
015132 
015136 
015142 
015146 
015152 
015154 
015156 
015162 



8iilK 

015166 
015172 
015176 
015202 
015206 
015210 
015212 
015216 



015220 
015220 
015222 
015226 
015232 
015236 
015242 
015244 
015246 



104413 
004767 
000000 
012345 
000000 
000000 
000004 
012345 
104023 



104413 
004737 
065652 
065600 
040252 
003000 
003000 
040052 
104024 



104413 
004767 
076400 
076400 
040200 
001000 
001000 
140200 



015252 104025 



0152S4 
015254 
0152S6 
015262 
015266 
015272 
015276 
015300 
015302 



104413 
004737 
056777 
054200 
042777 
000000 
000000 
0C2000 



3M FPP DIAGNOSTIC PART 2 MAC f 1 1 27, 1006 ) 
T6 DIVF t£st 



DIVF TEST 



Oi-NOV-76 21:13 PG&E fel 



000552 
OOOOOC 
X7012 
OOOOOC 



067012 



015710 
125252 
000000 
125252 



125252 



000462 
000000 
OOOOOC 
000000 



000000 



015710 
177777 
000000 
177777 



0C200Q 



♦ TEST 6 

♦THIS IS A TEST OF THE DIVF INSTRUCTION. NOTE T HAT h SUBROU'INE IE 
♦USED TO SET UP THE OPERANDS, EXECUTE THE INSTRUCTION AND CHECK TiE 
♦RESULTS. 
» 

TST6: SCOPE 



:CHECK DlVf UITH (AC=0) 
iCCl: 

LPERR 
JSR 

11: .WORD 
21: .WORD 
31: .UORD 
41: 0 
4 

51: .WORD 
51: ERROR 



PC.DIVFSU8 
0.0 

12345,67012 
0.0 



12345,67012 
23 



: SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION 
ERROR RESULT 
RESULT 3A0. 



: TEST DIVF UITH AC POSITIVE, FSRC POSITIVE AND IN ROUND NODE. 

CCC2: 



II: 
21: 
31: 
41: 

51: 
61: 



LPERR 
JSR 
.WORD 
.UORO 
.WORD 
3000 
3000 
.WORD 
ERROR 



PC.atDIVFSUB 
40252,125252 



40052,125252 
24 



;set up the loop on error address. 
f£rc 

RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RESULT. 
DIV NORMALIZE FAILURE. 



: TEST DIVF UITH AC POSITIVE, FSRC POSITIVE 

iCC3: 



11 
21 
31 
41 

51: 

61: 



LPERR 

JSR 

.UORO 

.UORD 

.UORD 

1000 

1000 

.UORO 

ERROR 



PC.DIVFSU8 
76400,0 
76400,0 
40200,0 



140200,0 
25 



; SET UP THE LOOP ON ERROR ADDRESS. 

;AC 

;FSRC 

*RES 

|FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
; ERROR RES. 

;SIGN BAD. 



; TEST DIVF UI T H BOTH OPERANOS POSITIVE 
CCC4: 



11 
21 
31 
41 

51: 



LPERR 

JSR 

.UORD 

.UORD 

.UORD 

0 

0 

.UORD 



PC.atDIVFSUB 

56777,177777 
54200,0 
42777, 177777 



2000,2000 



SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 



K05 
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3351 
33S2 
3353 
3354 
3355 
3356 
3357 
3356 
3359 
3360 
3361 
3362 
3363 
3364 
3365 
3366 
3367 
3368 
3369 
3370 
3371 
3372 
3373 
3374 
3375 
3376 
3377 
3378 
3379 
3380 
3391 
3382 
3383 
3384 
238S 
3386 
3387 
3382 
3389 
33SC 
3391 
3392 
3393 
3394 
3395 
33% 
3397 
3398 
3399 
3400 
3401 
3402 
3403 
3404 
3405 
34Ci 



C15306 104023 



015310 
015310 
015312 
015316 
015322 
015326 

sir 

015336 
015342 



015344 
015344 
015346 
015352 
0153S6 
015362 
015366 
015370 
015372 
015376 



015400 
015400 
015402 
015406 
015412 
01541b 
015422 
015424 
01542b 
015432 



015434 
015434 
015436 
015442 
015446 
015452 
015456 
015460 
0154b2 
015466 



015470 
015470 
015472 



104413 
004737 
012377 
012300 
040252 
30000 
30000 
177777 
104023 



104413 
004737 
064600 
066600 
036200 
000000 
000000 
003000 
104023 



104413 
004737 
034577 
023400 
051377 
000017 
000000 
003400 
104023 



104413 
004737 
067652 
056500 
051343 
000000 
000000 
051543 
104026 



015710 
177777 
000000 
125252 



177777 



015710 
300001 
000000 
000001 



003000 



015710 
17777b 
000000 
17777b 



003400 



015710 
125252 
000000 
107070 



107070 



bS: 

:TEST 
CCC5: 



IS 
2$ 
35 
4J 

5S: 
bS: 



CCCb * 



ii 

2$ 
3$ 
4$ 

5$: 
6S: 



ERROR 23 
THE OIVF INSTRUCTION: 



LPERR 

JSR 

.WORD 

.WORD 

.UORD 

0 

0 

.UORD 
ERROR 



PC.aiDIVFSUB 
12377,177777 
12300,0 
40252,125252 



■1 



;5ET UP THE LOOP ON ERROR ADDRESS. 

;AC 

;FSRC 

*RES 

|FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 
; ERROR RES. 



DIVIDE ALGORITHM. TEST ROUND CONSTANT. 

;SET UP THE LOOP ON ERROR ADORE SS 



LPERR 
JSR 
.UORD 
.UORO 
.UORD 
0 
0 

.UORD 
ERROR 



:TEST OIVF. 

CCC7: 



104413 

004737 015710 



IS: 
2S: 
3S: 
4S: 

51: 
6S: 



:DIVF 
CCC8: 



IS 
2S 
3S 
4S 

55: 
6S: 



:DIVF 
CCC9: 



LPERR 
JSR 
.UORO 
.UORO 
.UORD 
17 
0 

.UORO 
ERROR 



TEST. 



LPERR 

JSR 

.UORD 

.UORD 

.UORO 

0 

0 

.UORD 
ERROR 



PC.aiDIVFSUB 
64600,1 
66b00,0 
3b200.1 



3000,3000 
23 



PC.aiDIVFSUB 
34577,17777b 
23400,0 
51377,177776 



3400,3400 
23 



PC.aiDIVFSUB 
67652,125252 
56500,0 
51343,107070 



51543,107070 
26 



;AC 
FSRC 
;RES 

;FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 
; ERROR RES. 



;SET UP THE LOOP ON ERPOP ADDRESS 

;AC 
FSRC 
RES 

;FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 
ERROR RES. 



SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 

DIDN'T INCREMENT THE EXPONENT 
AFTER DIVID NORMALIZATION. 



UITH AC NEGATIVE, FSRC NEGATIVE. 

;SET UP THE LOOP ON ERROR ADDRESS 



LPERR 
JSR 



PC.aiDIVFSUB 



L05 
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3407 

3408 

3409 

3410 

3411 

3412 

3413 

3M14 

3M15 

3416 

3417 

3418 

3419 

3420 

3421 

3422 

3423 

3424 

3425 

3426 

3427 

3428 

3429 

3430 

3431 

3432 

3433 

3434 

3435 

3436 

3437 

3438 

3439 

3440 

3441 

3442 

3443 

3444 

3445 

344b 

3447 

3446 

3443 

3450 

3451 

3452 

3453 

3454 

3455 

3*56 

3457 

3458 

34£<3 

3"b0 

34bl 

34fc2 



CI 5478 
015502 
015506 
Q1S512 
015514 
015516 
015522 



015524 
015524 
015526 
015532 
015536 
015542 
015546 
015550 
015552 
015556 



015560 
015560 
015562 
015566 
015572 
015576 
015602 
015604 
015606 
015612 



015614 
015bl4 
01561b 
015622 
015626 
015632 
015636 
015640 
015642 
01564b 



015650 
015650 
015652 
015b5b 
015662 
OiSSbb 
Ol5b72 
Ol5b74 
0156/6 
015702 



140400 
140500 
040052 



140052 
104027 



104413 
004737 
160077 
040277 
160000 
000007 
000010 
060000 
104027 



104413 
004737 
040400 
140500 
140052 
000017 
000010 
040052 
104027 



104413 
004737 
060100 
040300 
060000 
000052 
000040 
060000 
104030 



104413 
004767 
060100 
040300 
060000 
000005 
000000 
060000 
104031 



000000 
000000 
125253 



125253 



01S710 
000000 
000000 
000000 



000000 



015710 

oooooo 

000000 
125253 



125253 



015710 
000001 
OOOOOO 
OOOOOO 



000001 



000032 
000001 
OOOOOO 
000001 



OOOOOO 



IS: 
2S: 
3$: 
4S: 

5S: 
6S: 



.WORD 
.WORD 
.WORD 
0 

0 

.WORD 
ERROR 



140400,0 
140500,0 
040052,125253 



140052, 1252S3 
27 



AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 
BAD SIGN. 



:DIVF WITH AC NEGATIVE AND FSRC POSITIVE. 
6CC10: 



IS 
2S 
3S 
4S 

SS: 
6S: 



LPERR 
JSR 
.WORD 
.WORD 
.WORD 
7 
10 

.WORD 
ERROR 



PC.3IDIVFSUB 
160077.0 
40277.6 
160000,0 



60000.0 
27 



;SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 
BAD SIGN. 



:DIVF WITH AC POSITIVE AND FSRC NEGATIVE. 
6CC11: 



IS 
2S 
3S 
4S 

5S: 
6S: 



:TEST 
dCC12 



IS 
2S 
3S 
4S 

5S: 
6S: 



:DIVF 
CCC13 



IS 
2S 
3S 
4S 

5S: 
bJ: 



LPERR 
JSR 
.WORD 
.WORD 
.WORD 
17 
10 

.WORD 
ERROR 



PC.3IDIVFSUB 
40400.0 
140500,0 
140052,125253 



40052,125253 
27 



;5ET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 
BAD SIGN. 



DIVF BOTH OPERANDS POSITIVE ANO TRUNCATE NODE. 



:rr 



Lr 
JSR 
.WORD 
.WORD 
.WORD 
52 
40 

.WORD 
ERROR 



PC.atOIVFSUB 
60l00,l 
40300,0 
60000 0 



60000,1 
30 



; SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AF T ER EXECUTION. 
ERROR RES. 
TRUNCATION ERROR 



WITH POSITIVE OPERANDS AND ROUNO NODE. 

;SET UP THE LOOP ON ERROR ADDRESS 



LPERR 
JSR 
.WORD 
.WORD 
.WORD 
5 
0 

.WORD 
ERROR 



PC.DIVFSUB 
bOiOO.l 
40300,0 
60000,1 



60000,0 
31 



AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 
ROUND ERROR. 



MAiNDEc-ii-Dfrpe-A p o p - 

DF*P8A.P11 01-N0V-78 2!:2fe 



MD5 



34 FPP DIAGNOSTIC PART g MACY11 27(100fc) 
Tfc DIVF TEST 



3463 
3484 
3%5 
3466 
3487 
d%8 

SM 

3471 
3472 
3473 
3474 
3475 

347? 
3480 
3461 
3482 
3483 
3484 
34B5 
348b 
3487 
3488 
3489 
3480 
3491 
3492 
3493 
3494 
3495 
34% 
3497 
3498 
3499 
3500 
3501 
3502 
TS03 
3504 
3505 
3508 
3507 
3508 
3509 
3510 
3511 
3512 
3513 
3514 
3515 
351b 
3517 

35ie 



015704 220137 01fcl34 



JMP 



3ICCCD0NE 



01-N0V-7& 21:12 PAGE fe4 



;G0 TO NEXT TEST. 



THIS SUBROUTINE, DIVFSUB. IS CALLED TO SET UP, EXECUTE 

AND CHECK THE RESULT OF A DIVF INSTRUCTION. IT IS CALLED THUS: 



JSR 

ACARG: -WORD 
FSRCARG: .UORD 
RES: .WORD 
FPSB: .UORD 
FPSA: .UORO 
ERRES: .UORO 
ERR: ERROR 
CONT: 



PC.3IDIVFSUB 

x,x 
x.x 

x,x 

X 
X 

x,x 

x 



AC OPERAND 
FSRC OPERAND 
EXPECTED RESULT 
FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
ERROR RESULT 
RESULT ERROR 
RETURN AODRESS 



THE OPERANDS ARE SET JP (USING ACQ FOR THE AC OPERAND). THEN 
FPSB IS LOAOEO INTO THE FPS. THE INSTRUCTION. DIVF IS EXECUTED. 
AFTER THE EXECUTION T HE RESULT IS CHECKED AGAINST THE 
EXPECTEO CORRECT RESULT RES. IF IT IS CORRECT THEN THE FPS 
IS CHECKED UITH THE EXPECTED CORRECT FPS. FPSA. IF JHEFPS WAS 
INCORRECT THEN IT IS REPORTED . IF THE RESULT WAS INCORRECT IT 
IS COMPARED UITH ERRES IN AN ATTEMPT TO ANALYSE THE ERROR. IF 
THE INCORRECT RESULT MATCHED ERRES THEN CONTROL IS PASSED TO 
THE ERROR CALL AT ERR. IF THE INCORRECT RESULT DID NOT MATCH ERRES 
THEN THE FAILURE IS REPORTED IN DIVFSUB AND CONTROL IS PASSED TO 
CONT. IF NO ERRORS AR£ DETECTEO THEN DIVFSUB RETURNS CONTROL 
TO CONT. 



015710 


012801 






DIVFSUB: 


015712 


012700 


000200 




MOV 


01571b 


170100 






LDFPS 




010100 






MOV 


01|7|g 


172410 






LDD 


015724 


OlblOO 


000014 




MOV 


0157X 


1701C0 






LDFPS 


015732 


012737 


01574b 


00123b 


MOV 


015740 


010100 






MOV 


015742 


082700 


000004 




AOD 


01574b 


174410 






1$: DIVF 


015750 


170204 






STFPS 


015752 


012700 


000200 




MOV 


01575b 


170100 






LDFPS 


015780 


012700 


01bl24 




MOV 


0157b4 


174010 






STD 


0157bb 


010102 






MOV 


015770 


010237 


001240 




MOV 


015774 


082702 


000004 




ADD 


OlbOOO 


010237 


001242 




MOV 


018004 


082702 


000004 




ADD 


OlbOlO 


010237 


001244 




MOV 


016014 


012737 


01bl24 


00124b 


MOV 



MOV £SP)+.R1 
•200, RO 
RO 

Rl.RO 
(RO).ACO 
14(Rli,R0 
RO 

•lS.3tSTMP2 

Rl.RO 
•4,R0 

(RQ),ACO 

R4 

•200, RO 
RO 

•DIVFT.RO 
ACO, (RO) 

Rl f R2 

R2 3tSTMP3 
•4 f R2 

R2,3ISTMP4 
•4,R2 

R2.3ISTMP5 
•DivFT,3lSTMPfe 



:GET A POINTER TO THE ARGUMENTS. 
SET FD MODE. 

LOAD THE AC OPERAND. 

LOAD THE FPS 

; ESTABLISH A POINTER TO FSRC. 

;TEST INSTRUCTION. 

;GET THE FPS. 
;SET FD MODE 

;GET THE RESULT OF THE DIVF. 
;SAVE THE DATA IN CASE OF ERROR. 



MAINDEC-11-DfFPB-A PDP 11 

DFFP8A.P11 01-NOV-76 21:0b 



3S19 
3520 
3521 
3522 
3523 
3524 
3525 
352b 
3527 
3528 
3529 
3530 
3531 
3532 
3533 
3534 
3535 
353b 
3537 
3538 
3539 
3540 
3541 
3542 
3543 
3544 
3545 
35% 
3547 
3548 
3549 
3550 
3551 
3552 
3553 
3554 
3555 
3S5b 
3557 
3558 
3559 
35b0 
35bl 
35b2 
3583 
35b4 
3Sb5 
358b 
3Sb7 
3588 
3589 
3570 
3571 
3572 
3573 
3574 



ND5 

34 FPP DIAGNOSTIC PART 2 MACY11 27(100b) 



01-N0V-76 21:12 PAGE 6S 



Tb 



DIVF TEST 



01bO22 
01b02b 


010437 
016137 


001250 
000016 


001252 




nov 
nov 


R4.ai$TMP7 
16(Rl),atSTMP10 




018034 
OlbOHO 
01b042 
QlbOSO 


021061 
0Q1011 
026081 
001005 


000010 
000002 


000012 




CMP 
BNE 
CMP 
BNE 


^R0),10(R1* 
10S 

2CR0),12(R1) 
10$ 


;IS THE RESULT CORRECT' 
;IF INCORRECT BRANCH. 


018052 
018056 
018080 


028104 
001020 
000161 


000016 
000026 






CUP 
BNE 
JflP 


16(R1),R4 
15$ 

26(R1) 


;IS FPS CORRECT' 
IF INCORRECT BRANCH. 
;IF NO ERRORS OCCURRED RETURN. 


018084 
01b070 
01b072 
018100 


021061 
001010 
028081 
001004 


000020 
000002 


000022 


10$: 


CMP 
BNE 
CMP 
BNE 


(RO) ,20iRl) 
US 

2CR0),22(R1) 
11$ 


r\Arr tup Tkl^ADOrAT Of CI II T 

:D0E5 THE INCORRECT RESULT 

■MATCH THE ANTICIPATED INCORRECT RESULT 

; BRANCH IF NO. 


018102 

016104 
016110 


010102 

062702 
000112 


000024 






MOV 

ADO 
JMP 


R1.R2 

124 ,R2 

(R2) 


:IT MATCHED SO RETURN TO THE ERROR 
; REPORT AT THE CALLING ROUTINE. 


016112 
016112 
016114 


104023 
000161 


000026 




111: 
12S: 
13S: 


ERROR 
JMP 


23 

26(R1) 


; REPORT RESULT INCORRECT. 


016120 
016120 
016122 


104032 
000774 






15$: 
16S: 


ERROR 
BR 


32 
13$ 


; REPORT FPS INCORRECT. 


016124 
016132 


000000 
000000 


000000 


000000 


DIVFT: 


.UORD 


0,0,0,0 




016134 
016134 


104412 






CCCOONE 


"rsetup 




;G0 INITIALIZE THE FPS AND STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTUARE 
: VIRTUAL CONSOLE SWITCH REGISTER (HAS 
;TriE USER TYPED CONTROL G'). 



016136 000004 



016140 
016140 
016142 
016146 



104413 

004737 016630 
034277 000000 



000000 



•*TEST 7 DIVD TEST 

!«THIS IS A TEST OF THE DIVD INSTRUCTION. NOTE THAT A SUBROUTINE IS 

!*USED TO SET UP THE OPERANDS, EXECUTE THE INSTRUCTION AND CHECK THE RESULTS. 

it*************************************************************** 

tST7: SCOPE 

:DIVD TEST WITH POSITIVE OPERANDS AND IN ROUND MODE. 
0DD1: 

LPERR 

JSR PC.3IDIVDSU8 
1$: .WORD 34277,0,0,0 ;AC 



;SET UP THE LOOP ON ERROR ADDRESS. 



BOb 



3«* CPF DWGNOS 
T7 



PART l fiflCYll 27il00b) 
OIVD TEST 



3S^S 
357b 
3S77 
3S79 
3579 
3580 
3581 
3582 
3583 
358M 
3585 
358b 
3587 
3586 
3589 
3590 
3591 
35S2 
35S3 
3594 
3595 

121 

3597 
3598 
3599 
3600 
3501 
3502 
35G3 
3604 
3605 
3606 
3607 

3boe 

3b09 
3blO 
3bll 
3812 
3513 
3614 
3bl5 
3blb 
3bl7 
3618 
3619 
3fc20 
3621 
3b22 
3623 
3b2M 
3b25 
3b2b 
3627 
3b28 
362S 
3fc2C 



ClblSM 

oibisb 

016154 

216155 
216174 

im 

216202 
21b2i0 
216212 



C16214 
016214 
0lb21b 
0lb222 
016230 

OlbfsS 
016242 
016250 
016252 
0162SM 
Olb25b 
31b264 
316266 



015270 
015270 
015272 
015275 
01530M 
015305 
016314 
01b31b 
016324 

015332 
016340 
016342 



016344 
01634M 
0153% 
015352 
015350 
015352 
015370 
015372 
015*400 
215402 
216404 
015*05 



OOOOOC 
240277 
2O000C 
034200 
000000 
2O020C 
0 00200 
1 77777 

12HC33 



200000 


UOwOOO 


el 


unor\ 
. WUKU 




000002 


CC300C 


3$ 


.WORD 


34200.0,0,0 






H% 


200 










200 




« / t 1 1 * 


177777 


SS 


.UORD 


-1.-1.-1,-1 






bS 


ERROR 


33 



:DIVD 
D0C2: 



10SM13 








00M737 


215532 






134277 


oooooc 


oooooc 


IS: 


000000 








040277 


000000 


000000 


2S: 


000000 








134200 


000000 


002200 


35: 


000000 








000207 






4$: 


000212 








If t / v / 


177777 


I, / ' / / 


sS: 


177777 








104033 






51: 








:DIVD 








D003: 


104413 








0OM757 


000332 






17)300 


000000 


000000 


IS: 


000001 








1H0300 


000000 


000000 


2S- 


000000 








03M200 


nnnooo 


000000 


3S: 


000000 














4S: 


000240 
034200 


200000 


000000 


5S: 


000001 








104035 






6S: 








:DIVD 








DOOM: 


104413 








004737 


015530 






034300 


000000 


000000 


IS: 


000001 








140300 


000000 


000000 


25: 


000000 








134200 


000000 


000000 


35: 


000001 








000207 






4S: 


000210 








134200 


000000 


000000 


SS: 



01-N0V-75 21:1= bb 

;FSRC 
;R£S 

;FPS BEFORE EXECUTION. 
:FPS AFTER EXECUTION. 
; ERROR RES. 



WITH AC NEGATIVE AND FSRC POSITIVE IN TRUNCATE NODE. 

SET UP THE LOOP ON ERROF AC DRESS 
AC 

FSRC 
RES 



LPERR 

JSR 

.WORD 



PC.9S0IVDSU8 

134277,0,0.0 



.UORD 
.UORD 



40277.0,0,0 
134200,0,0.0 



207 
210 
.UORD 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RESULT 



■1,-1.-1,-1 
ERROR 33 

TEST UITH OPERANDS BOTH NEGATIVE AND IN TRUNCfiTE 10DE. 



UORD 
UORD 
UORD 



PC.DIVDSUB 
134300.0.0,1 

140300,0,0.0 

34200,0,0.2 



.UORD 
ERROR 



LPERR 

JSR 

.UORD 



SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 
RES 



EXECUTION. 
EXECUTION. 



34200.0.0,1 ; ERROR RES. 
35 ; TRUNCATION ERROR. 

UITH AC POSITIVE AND FSRC NEGATIVE IN ROUND WOE. 

; SET UP THE LOOP ON ERROR ADDRESS 
;AC 
;FSRC 
;RES 



PC.atOlVDSUB 
34300,0,0,1 



.UORD 
.UORD 



140300,0.0.0 
134200,0,0,1 



207 
210 
.UORD 



134200,0,0.0 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 



^INOEC-Il-DFrpB-A PDP 11 
Dp™.PU Ol-NOV-76 21:2b 

3bji ci64m oooooo 

3632 OlbHlb 10HO36 



CDfe 



3H FPF DIAGNOSTIC PART 2 NACYI1 27(1006) 01-N0V-7b 21:12 PAGE b7 
T7 DIVO TEST 



363S 
3640 
3641 
3642 
3643 
36 HM 
3645 
36% 
3bH7 
3648 
36HS 
3650 
3651 
3652 
3653 
3654 
3655 
3656 
3657 
3658 

US 8 

3661 
3662 
3663 
3664 
3665 
3666 
3667 
3 66 8 
J669 
3670 
3671 
3b72 
3b73 
3b7M 
3b75 
3676 
3677 
3678 
367S 
3680 
3681 
3682 
3683 
3684 
3685 
3686 



0lb420 
016420 
316422 
016426 
01b434 
01b43b 
0lb444 
Olb4% 
D1&452 
016456 
016460 
016462 
016470 
016472 



104413 

100400 
000000 



Clb474 
01b474 
016476 
016502 
016510 
016512 
016520 
16522 
1653 
C16532 
016534 
016536 
016544 
0165% 



016550 
016J50 
016552 
016556 
016562 
016566 
016572 

016576 
016604 
016606 
016610 
016612 
016620 
016622 

:i6624 



140052 
125252 
007647 
0 07650 

177777 
177777 
104033 



104413 
004737 

000000 
100500 
000000 

007707 
0 07710 
1 77777 
177777 
104033 



01 



000000 



17777 



bl: 



ERROR 3b 



:CIVD 'ESI 
0005: 



000000 

125252 
125252 



177777 



000000 11 
300000 21 
3S 
*S 

177777 51 
bS 



LPERR 

JSR 

.WORD 

.UGRD 

• WORD 

.UORO 

7647 

7b50 

.WORD 

ERROR 



PC.atDlVDSUB 
100400.0.0,0 

500.0.0,0 

140052,125252 
125252,125252 

-1.-1.-1,-1 
33 



; ROUND ERROR. 

SET UP T HE LOOP ON ERROR ADORE: 

AC 

F5RC 

RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 



:DIVO TEST UITH 
0006 



OOCOOC II 
000003 2S 
35 
4S 
51 
bS 



LPERR 
JSR 
.UORO 



AC POSITIVE AND FSRC NEGATIVE IN ROUND MODE. 

SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 
RES 



PC.5iOIVDSUB 
400. C, 0.0 



.UORO 100500.0.0,0 



7707 
7710 
.WORD 

ERROR 



:CIVD TEST. 
0007: 



104413 








LPERR 


004737 


316630 






J 


170360 


170360 




IS. .UORO 


170360 


170360 






.UORO 


170360 


170360 




2S 


.UORO 


170360 


170360 






.UORO 


040200 


000000 


000000 


35 


.UORO 


300000 










007717 






4$ 


7717 


007700 






7700 


177777 


177777 


177777 


ss 


.UORO 


177777 


104033 






6S 


ERROR 


300137 


017070 






JNP 



-1.-1.-1,-1 

33 



PC.atDlVDSUB 
176360,170360 
170360, 170360 
170360, 170360 
170360.170360 
40200,6,0,0 



-1,-1,-1.-1 
33 

StDOOOONE 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 



SET UP THE wOOP ON ERROR ADDRESS 

AC 

FSRC 

RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 



;G0 TO NEXT TEST. 
;THI5 SUBROUTINE. DIVDSUB, IS CALLED TC SET UP. EXECUTE 



trtrD 9>; c :. 

3692 
3693 
36* 
36<K 
3t»% 
3697 
3696 
3699 
3700 



3703 
37CS 

3705 

3736 

3737 
3706 
3739 
3710 
3711 
371c 
3713 
371H 
3715 
3716 
3717 
3718 
3719 
3720 
3721 
3722 
3723 
372M 
3725 
3726 
2727 
3726 
372<3 
3730 
3731 
3732 
3733 
3734 
3735 
3736 
3737 
3738 
3723 
2740 
27^1 

27i£ 



■S-H 

* * -s ' 



216630 
016632 
016636 

016640 
0166H2 
016644 
016650 

016652 
016660 
016662 



016670 
016672 
016676 

016700 
016704 

016706 
016710 
016714 
016720 
01672M 

0167X 
016734 
016742 
216746 



012601 
012700 
170100 

010100 
172410 
016100 
170100 

012737 
010100 
062700 



016666 174410 



170204 
012700 
170100 

012700 
174010 

010102 
010237 
062702 
010237 
062702 
010237 
012737 
010437 
016137 



DOb 

2-4 rcc ciAGrcS'i: p«RT 2 NAC V 11 27il006) 01-N0V-76 21:12 PAGE 6e 
DIVC TEST 

ANf. CHECK THE RESULT OF A OlvD INSTRUCTION. IT IS CALLED THUS: 



ACARG: 

^SRCARG 

RES: 

n>SB: 

FPSA: 

ERRES: 

ERR: 

CONT: 



JSR PC.aiDlVDSUB 

.WORD X.X.X.X 

.UORO X.X.X.X 

.WORD X.X.X.X 

.UORO X 

. WORC X 

.UORD X.X.X.X 

ERROR X 



AC OPERAfC 
FSRC OPERAfC 
EXPECTEO RESULT 
FPS BEFORE EXECL T IC> 
FPS AFTER EX£CL t ::n 
ERROR RESUL T 
RESULT ERROR 
RETURN ADDRESS 



THE OPERANDS ARE SET UP i JSING fiCO FOR T HE AC OPERAND ) . THEN 
FPS8 IS LOADED INTO THE F?S THE INSTRUCTION. DIVD IS EXECU T £D 
AFTER THE EXECUTION THE RESULT IS CHECKED AGAINST THE 
EXPECTED CORRECT RESULT RES. IF IT IS CORRECT THEN THE FPS 
IS CHECKED UITH THE EXPECTED CORRECT FPS. FPSA. IF THE FPS HAS 
INCORRECT THEN IT IS REPORTED- IF THE RESULT HAS INCORRECT V 
IS COMPARED UITH ERRES IN AN ATTEMPT TO ANALYSE THE ERROR. IF 
THE INCORRECT RESUL" MATCHED ERRES T HEN CONTROL IS PASSED TO 
THE ERROR CALL AT ERR. IF THE INCORRECT RESULT DID NOT NATCH ERRES 
T HEN THE FAILURE IS REPORTED IN DIVDSUB AND CONTROL IS PASSED TO 
CONT. IF NO ERRORS ARE DETECTED THEN DIVDSLC RETURNS CONTROL 
'0 CONT. 



000200 
000030 

0:6666 0C1236 
000010 

000200 
017060 



001240 
000010 
001242 
000010 
001244 

017060 001246 
0C12S0 

000032 001252 



DIVDSUB: 



NOV 
LDFPS 

NOV 
LX 
NOV 
LDFPS 

NOV 
NOV 
ADD 



NOV (SP<*.R1 :GET A POINTER TO THE ARGJIEV 

•200.R0 ;SET FD NODE. 

RO 



Rl.RO 
(RO).ACO 
30(Rl),R0 
RO 

US.3tSTnP2 

Rl.RO 

•i6.ro 



IS: 



DIVD (RO).ACO 

STFPS R4 

NOV »20C,RQ 

LDFPS RO 

MOV •DIVDT.RO 

STD ACO.(RO) 

MOV R1.R2 

MOV R2.3tlTMP3 

ADD «10.R2 

NOV R2.3tSTHP4 

HOD 110. R2 

NOV R2.3»5TMP5 

NOV •DlvOT.3tSTNP6 

NOV R4,3«ITMP7 

NOV 32(RD,3«STNP10 



; SET UP THE ACO OPERAND. 
:LOAD THE FPS. 

; ESTABLISH A POINTER TC FSRC. 

:EXECUTE THE TEST INSTRUCTION. 

:GET THE FPS. 
;SET FD MODE 

;GET THE RESULT. 

:SAVE DATA IN CASE OF ERROR. 



EOb 



IRI'CEC-li-OFPPB-fl pop 11 

DffpBfl.Pi: ::-NC.-:fc a: : cb 
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T? DIVD TEST 



3743 
374*4 
37% 
37% 



3750 
3751 

m 

2754 
3755 
2756 
3757 
3759 
3759 
2760 
3751 
3752 
3753 
375M 
3755 
3756 
3757 
3758 
3769 
3770 
3771 
3772 
3773 
2774 
3775 
2776 
3777 
2779 
2779 
278C 
2781 
2782 
2782 
278M 
2785 
2786 
2787 
3788 
3789 
279C 
2791 
2792 
2792 
2794 
2795 
27% 
2797 
279e 



016754 
016756 
016762 
016766 
016772 
316774 
016776 



010102 
062702 
012703 



077503 



017006 

017012 
01701M 
017020 
017024 
01703C 
017032 
017034 
017036 
017040 



0170% 
0170% 
017050 

017054 
017054 
017056 

01706C 
017066 

017070 
017070 



)1023 
000161 

010102 
062702 
012703 
012705 

001005 
077503 
010102 
062702 



017044 000112 



104033 
000161 



1040j» 
000774 

000000 
000000 



LC44I2 



0C0C2C 
017060 
000004 



000032 
000046 



000024 
01706C 
000004 



000044 



0000% 



21: 



10S: 



11$: 



12$: 
13S: 
14S: 

15S: 
16S: 



MOV 
ADO 
MOV 
MOV 
CMP 
BNE 
SOB 

CMP 
BNE 
JMP 

MOV 
ADD 
MOV 
MOV 
CMP 
BNE 
508 
MOV 
ADD 

JMP 



ERROR 
JMP 



ERROR 
BR 



R1.R2 
■2ft, R2 
•DIVDT.P3 
•4.RS 

(R2)+, (R3)+ 

10S 

RS.2S 

32(RD.RH 
1SS 

46(R1) 

R1.R2 
•34, R2 
•DIVOT, R3 
•4.R5 

(R2)4,(R3)+ 
12S 

R5.ll* 
R1.R2 
•44, R2 

(R2) 



33 

46CRD 



34 
141 
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; CHECK THE RESULT. 



: BRANCH IF RESULT INC0RREC T . 



;IS FPS CORRECT 7 

; BRANCH IF INCORRECT. 

; RETURN. 

;UAS INCORREC RESUl" ANTICIPATE:' 



; BRANCH IF NO. 

;IF THE INCORRECT RESULT WAS 
; ANTICIPATED RETURN TO THE 
ERROR REPORT IN THE CALLING 
; ROUTINE. 

: REPORT RESULT INCORRECT. 



; REPORT FPS INCORREC T . 



XJCOOO 000000 DIVOT: .UORD 0,0,0,0 



DDDDONE: 



017072 000004 



RSETUP ;G0 INITIALIZE THE FPS AND STACK; 

— IF THE USER HAS EXPRESSED 
, DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER tHAS 
;THE USER TYPED CONTROL G 7 ) . 



4TEST 10 MULF TEST 

*THIS IS A TEST OF THE NULF INSTRUCTION. IT MAKES USE OF A SUBROUTINE 
*T0 SET UP THE OPERANDS, EXECUTE THE MULF INSTRUCTION AND CHECK THE 
♦RESULTS. 
* 

tSTIO: SCOPE 

;MULF WITH (FSRC=ACrO) 



iniNoec-ii-ofFPfi-p pd p :i 



FOfe 

24 FPP DIAGNOSTIC PORT 2 HACY11 27i 1006) 
TIC i-IULF TEST 



37<W 
3800 
38C1 
3802 
3803 
3804 
3805 
380b 
3807 
3808 
38OT 
381C 
3811 
3812 
3813 
3814 
3815 
381b 
3817 
3818 
3819 
3820 
3821 
3822 
3823 
382M 
3825 
3826 
3327 
3828 
3829 
3830 
3831 
3832 
3833 
3834 
3835 
3836 
3837 
3838 
383S 
38H0 
3841 
3842 
38M3 
3844 

38% 
38"7 
3848 
384S 
3850 
3851 
3852 
3853 
3854 



C1707M 
017074 
01707b 
017102 
01710b 
017112 
01711b 
017120 
217122 
01712b 



C17130 
017130 
017132 
01713b 
1317142 
01714b 
017152 
017154 
01715b 
Ol71b2 



0l7lb4 
C171b4 
Ol71bb 
017172 
01717b 
017202 
017206 
017210 
017212 
01721b 



134413 
004737 
000000 
000000 
000000 
007S17 
007504 
177777 
10*4037 



104tl3 
00H737 

771 



0l7b54 
000000 
OOOOOC 
OOOOOC 



OOOOOC 
000013 
300004 

177777 
104037 



104413 
00*4737 
000000 
071b2S 
000000 
007500 
007504 
177777 
10*4037 



017554 
03*4435 
000000 
000000 

177777 



017554 
000000 
153443 
000000 



177777 



EEE1: 



IS 
2S 
3S 
4$ 

SS: 
bS: 



:«ULF 
EEE2: 



IS 
2S 
3S 
4S 

5S: 
bS: 



:NULF 
EEE3: 



IS 
2S 
3S 
4S 

5S: 
bS: 



LPERR 

JSR 

.UORO 

.WORD 

.UORO 

7517 

7504 

.UORO 

ERROR 



B C.aiMULF5U8 

o,6 

0,0 
CO 



-1,-1 

37 



UITH (FSRC=0), 



LPERR 

JSR 

.UORO 

.UORO 

.UORO 

13 

4 

.UORO 
ERROR 



PC.aifUJLFSUB 
71&25, 34435 

o!o 



-l.-l 

37 



UITH (AC=0) 



LPERR 

JSR 

.UORO 

.UORO 

.UORO 

7500 

7504 

.UORO 

ERROR 



PC.3IP1ULFSUB 

o.o 

07lb25, 153443 
0,0 



-1,-1 

37 
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;SET JP THE LOOP ON ERROR KXMZll. 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



;SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 



;SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 



017220 






EEE4: 


017220 


104413 






017222 


004737 


017554 




017226 


040200 


000000 


IS: 


017232 


040177 


177777 


2S: 


017236 


040177 


177777 


3S: 


017242 


000017 




MS: 


017244 


000000 






0172% 


140177 


177777 


5S: 


017252 


104041 




bS: 



HJLF UITH AC POSITIVE AND FSRC POSITIVE IN ROUND NODE. 

; SET UP THE LOOP ON ERROR ADDRESS. 



LPERR 
JSR 
.UORO 
.UORO 
.UORD 
17 
0 

.UCRD 
ERROR 









:HJLF 


UITH AC 


017254 






EEE5; 


LPERR 


017254 


104413 






017256 


004767 


000372 




JSR 


017262 


040177 


177777 


IS: 


.UORO 


017266 


040200 


000000 


2S: 


.UORD 


017272 


040177 


177777 


3S: 


.UORO 


017276 


000040 




4S: 


40 


017300 


000040 






40 



pc.atnuLFsue 

40200,0 

40177,-1 

40177,-1 



140177,-1 
41 



PC.MULFSUB 
40177,-1 
40200,0 
40177,-1 



AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 
BAD SIGN. 



POSITIVE IN TRUNCATE NODE. 
;SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



GDb 



-•rr 



pi: 



38~C 
3871 
3872 
3873 
3874 



3877 
3878 
3879 
388G 
3881 
3882 
3883 

388S 
3886 
3887 



-D rrp B-M 



pdf :: 

21. Cb 
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38S5 



3858 
3859 
3860 
3861 
3862 
3863 
386M 
3865 
3866 
3867 



3889 
389C 
38*31 
3892 
3893 
3894 
3895 
38% 
3897 
3898 
3899 
3900 
39Ci 
3902 
3903 
3904 
3905 
3906 
39C7 
3908 
3909 

29:: 



C17322 
017306 



31731C 
317310 
017312 
017316 
017322 
017326 
017332 
C17334 

mi 



317344 
017344 

8133 

017356 
017362 
017366 
017370 
017372 
017376 



017400 
01740C 
017402 
017406 
017412 
017416 
017422 
017424 
017426 
017432 



017434 
017434 
017436 
017442 
0174% 
017452 
017456 
017460 
017462 
C17466 



CI 7470 
017470 



1 34342 



104413 

004737 01 7654 

040100 000000 

040100 oocooo 

040020 30000C 
000012 
000000 

042Q4Q 0003CC 



104413 
004737 
017500 
023652 
003177 
007417 
0 074QO 
177777 
1 0*037 



104413 
004737 
040342 
176542 
176707 
000007 
300010 
076507 
104041 



104413 
004737 
140200 
007417 
107417 
gOQQQQ 

300010 
007417 
104041 



134413 



017654 
300000 
125252 
177777 



;// ft 



317654 
OOCOOO 
000000 
102000 



102000 



017654 
000000 
007417 
007417 



007417 



51. 



:MJLF 
EEEfc: 



IS 
2S 
3S 
4S 

5$: 
bS: 



:MULF 
EEE7: 



IS 
2S 
3S 
4S 

5S. 
6S: 



:NULF 
EEEB: 



IS 
2S 
3S 
4S 

7S: 
bS: 



:HULF 
EEE9: 



IS 
21 
3S 
41 

51: 
61: 



:MULF 
EEE10: 



.UORO 
ERROR 



> MACY11 27(1006) 

!s T 

37777.-1 
42 
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ERROR RES 

5T 252 TO' 044 INTO 444 (BUT Yfc2) 
HUL. NORMALIZATION -AILURE. 



WITH BOTH OPERANDS POSITIVE NORMALIZE TEST. 



LPERR 

JSR 

.WORD 

.UORO 

.UORO 

12 

C 

.UORO 
ERROR 



PC.aiMULFSUB 
MOlOO.O 
40100,0 
40020,0 



42040.0 
43 



:SET UP THE LOOP ON ERROR ADDRESS 

AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 

ST 252 TO 444 INTO 042 (BUT Y&2; 
MUL. NORMALIZATION FAILURE. 



UITH BOTH OPERANDS POSITIVE IN ROUND MODE. 

;SET UP THE LOOP ON ERROR ADDRESS 



LPERR 
JSR 
.UORO 
.UORO 
.UORO 
7417 
7400 
.UORO 
ERROR 



PC.JtNULFSUB 
17500,0 
23652,125252 
3177,-1 



-1,-1 
37 



;AC 

;FSRC 

:RES 

;FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 



UITH AC POSITIVE AND FSRC NEGATIVE IN ROUNO MODE. 

; SET UP THE LOOP ON ERROR AOORESS 



LPERR 
JSR 
.UORO 
.UORO 
.UORO 
7 
10 

.UORD 
ERROR 



PC.5MULFSUB 
40342.0 
I7b542,0 
176707,102000 



76507,102000 
41 



;AC 
;F5RC 
RES 

FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 
ERROR RES. 
BAD SIGN. 



UITH AC NEGATIVE ANO FSRC POSITIVE IN ROUND NODE. 

; SET UP THE LOOP ON ERROR AOORESS 



LPERR 
JSR 
.UORO 
.UORD 
.UORD 
0 
10 

.UORD 
ERROR 



PC.3INULFSUB 
146200.0 
7417.7417 
107417,7417 



7417,7417 
41 



AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 
BAD SIGN. 



UITH BOTH OPERANDS NEGATIVE IN ROUNO MODE. 

LPERR ;SET UP THE LOOP ON ERROR ADDRESS 



i:-Dfrp8-N pdf :: 

DffPBfi.Fll 3i-NC;-~fe 21:06 
3911 C17M72 00473? 017654 

£13 8i3& iSH 
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3921 



3924 
3925 
3926 
3927 
3929 
3929 
3930 
3931 
3932 
3933 
3934 
3935 
3338 
3937 
3936 
3939 
3940 
3941 
3942 
3943 
3944 
294S 
39% 
394? 
394e 
394<5 
39SC 
3951 
3952 
3953 
3954 
3955 
3956 
3957 
395E 
295S 
2%C 
3%1 
396c 
3%3 

2%E 
2°bt 



0WNO0 30000C 

17 



3914 oi:.._ 

3915 0l7fl2 
39'6 017514 
3917 31751b 160400 300000 
3911? 017522 1D4041 

19 



S 



C17524 
17S2S 
17526 
017532 
017536 
017542 
0175% 
0.7550 
017552 
017556 



017560 
017560 
017562 
017566 
017572 
017576 
017602 
017604 
017606 
017612 



017614 
017614 
017616 
317622 
017626 
017632 
017636 
017640 
017642 
0176% 



104413 
004737 
140300 
160000 
060100 
000010 

oooooo 

060100 
104044 



104413 
004737 
060000 
140300 
160100 
00754? 
007550 
160100 
1040% 



104413 
004737 
040277 
060000 
060077 
000014 
OOOOOO 
060077 
104044 



317650 00C167 



017654 
OOCOOO 
000001 
000002 



0OOOC1 



017654 
000001 
300000 
000001 



00000 1 



017654 
OOCOOO 
000001 
000001 



000002 
000224 



TIC 



i! 

3S 

4S 

SI: 

61: 



1LL r TEST 



JSR 
.UORO 
.UORD 
.UORO 

1? 
0 

.WORD 
ERROR 



PC.3IMULFSJB 
60400. 0 



160400.0 
41 



AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 
BAD SIGN. 



:ttJLF BOTH OPERANDS NEGATIVE IN ROUND MODE. 
EEE11: 





LPERR 




JSR 


IS: 


.UORO 


2S: 


.UORD 


31: 


.UORD 


4S: 


10 




0 


51: 


.UORD 


61: 


ERROR 



pc.amuLFSuB 

140300,0 
160000.1 
60100.2 



60100.1 
44 



;SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES- 
ROUND FAILURE. 



:IHJLF UITH AC POSITIVE AND FSRC NEGATIVE IN TRUNCATE NODE. 
EEE12: 



11 
21 
31 
41 

51: 
61: 



LPERR 
JSR 
.UORD 
.UORO 
.UORO 
7547 
7550 
.UORO 
ERROR 



PC.atflULFSUB 
60000.1 
140306, 0 
160100, 1 



160100,1 
45 



; SET UP THE LOOP ON ERROR ADDRESS. 
AC 

f & 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 
TRUNCATION tRROR. 



:f1ULF UITH AC POSITIVE AND FSRC POSITIVE IN ROUND NODE. 
EEE13: 



11 
21 
31 
41 

51: 
61: 



LPERR 
JSR 
.UORD 
.UORO 
.UORO 
14 
0 

.UORD 
ERROR 

JflP 



PC.3INULFSUB 
40277,0 
60000.1 
60077,1 



60077,2 
44 

EEEDOHE 



: SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ERROR RES. 

ROUND FAILURE. CONSTANT BAD. 
;G0 TO THE NEXT TEST. 



THIS SJ8R0UTINE. NULFSUB. IS CALLEO TO SET UP, EXECUTE , if . 
AND CHECK THE RESULT OF A NULF INSTRUCTION, it IS CALLED THUS: 



JSR 

ACARG : .UORD 
FSRCARG: .UORD 
RES: .UORD 
FPSB: .WORD 
FPSA: . UORD 



PC.3fHULFSUB 

X,X 
X,X 
X.X 
X 

X 



AC OPERAND 
FSRC OPERAND 
EXPECTED RESULT 
FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 



IOb 



mhInde:-::-:)*""^-* °dp 
z"*9».pi: ::-*o.-7fc =i:06 
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TIC M'JLF TEST 
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3985 
3986 

3987 
3988 
3989 
3990 
3991 
3992 
3993 
3994 
399S 
39% 
3997 
3996 
3999 
4000 
4001 
4002 
4003 
4004 
4005 
4008 
4007 
4008 
4009 
4010 
4011 
4012 
4013 
4014 
4015 
4015 
4017 
4016 
401S 
4020 
4021 
^022 



017554 
017555 
017662 
017554 
017555 
017570 
017574 
017675 
017704 
017706 



012501 
012700 
170100 
010100 
172410 
016100 
170100 
012737 
010100 
062700 



017712 171010 



017714 
017716 
017722 

01772M 
017730 

017732 
017734 
017740 
017744 
017750 
017754 
017760 
017766 
017772 

020000 
020004 
020006 
020014 

020016 
020022 
020024 



170204 
012700 
170100 

012700 
174010 

010102 
010237 
062702 
010237 
062702 
010237 
012737 
010437 
016137 

021061 
001011 
026061 
001005 

025104 
001020 
000161 



ERRES: 
ERR: 

CONT: 



.UORD 
ERROR 



X,X 
X 



E d RjR PESO.T 
RESULT ERROR 
PETJRN ADDRESS 



THE OPERANDS ARE SET UP (USING ACO FOR THE AC OPERAND >. THEN 
FPSB IS LOADED INTO THE FPS. THE INSTRUCTION. MULF IS EXECUTED. 
AFTER THE EXECUTION THE RESULT IS CHECKED AGAINST THE 
EXPECTED CORRECT RESULT, RES. IF IT IS CORRECT THEN THE FPS 
IS CHECKED UITH THE EXPECTEO CORRECT FPS. FPSA. IF THE FPS UAS 
INCORRECT THEN IT IS REPORTED. IF THE RESULT UAS INCORRECT IT 
IS COMPARED WITH ERRES IN AN ATTEMPT TO ANALYSE THE ERROR. IF 
T HE INCORRECT RESULT MATCHED ERRES THEN CONTROL IS PASSED TO 
THE ERROR CALL AT ERR. IF THE INCORRECT RESULT DID NOT MATCH ERRES 
THEN THE FAILURE IS REPORTED IN MULFSUB AND CONTROL IS PASSED TO 
CONT. IF NO ERRORS ARE DETECTED THEN MULFSUB RETURNS CONTROL 
TO CONT. 



300200 
000014 

017712 0 C123fc 
000004 

000200 
020070 



001240 
000004 
001242 
000004 
001244 

020070 00124& 
001250 

000016 001252 
000010 

000002 000012 

000016 
00002b 



MULFSUB: MOV <SP)+,R1 

MOV 1200. RO 

LDFPS RO 

MOV Rl.RO 

LDD (RO).ACO 

MOV 14(Rl),R0 

LDFPS RO 

MOV •lS.3tITHP2 

MOV Rl.RO 

ADD 14. RO 



1$: MULF (RO).ACO 

STFPS R4 

MOV §200, RO 

LDFPS RO 

MOV IMULFT.RO 

STD ACO.(RO) 

MOV R1.R2 

MOV R2,3fSTMP3 

ADD I4.R2 

MOV R2,3iSTMP4 

ADD t4,R2 

MOV R2.3ISTMP5 

MOV •NULFT.3IITMP6 

MOV R4.3ISTMP7 

MOV 16(Rl) f 3»STMP10 

CMP (RO).IO(RD 

BNE 10S 

CMP 2(R0),12(RD 

BNE 101 

CMP 16(R1),P4 

BNE 15S 

JMP 26 (Rl) 



:GET A POINTER TO THE ARGUMENTS. 
SET FD MODE. 

LOAD THE AC OPERAND. 

LOAD THE FPS 

; ESTABLISH A POINTER TO FSRC. 
;TEST INSTRUCTION. 



;GET THE FPS. 
;SET FD MODE 



;GET THE RESULT OF THE MULF. 



;SAVE THE DATA IN CASE OF ERROR. 



;IS THE RESULT CORRECT' 
;IF INCORRECT BRANCH. 



; IS FPS CORRECT' 

:IF INCORRECT BRANCH. 

;IF NO ERRORS OCCURRED RETURN. 



iHlNDEC-l.-CFrPB-A POP 11 

3PcP9fl.Pi: ui-NOV-76 21:06 



JOB 

34 FPP DIAGNOSTIC PART 2 MACY11 27(1006) 



4023 
4024 

4025 
4026 
4027 
4029 
4029 
4030 
4C31 
4032 
4033 
403S 
4C3S 
4036 
4037 
4039 
4039 
4040 
40M1 
40*42 
4043 
4044 
4045 
40% 
4047 
4048 
4049 
4050 
4051 
4052 
4053 

4054 

4055 
4056 
4057 
4058 
4059 
4060 
4061 
4062 
4063 
4064 
4065 
4066 
4067 
4068 
4069 
4070 
407i 
4072 
4073 
4074 
4075 
4076 
4077 
407E 



C200JC 021061 000020 

020034 001010 

020036 026061 000002 

320044 0010CM 

020046 01C102 



020050 
020054 

020056 
020056 
020060 

020064 
020064 
020066 

020070 
020076 

020100 
020100 



0627Q2 00302-J 
000112 



104C37 

000161 000026 



104040 
000774 

000000 000000 
000000 



1C4M12 



02C102 OOCOOM 



020104 
020104 
020106 

8foi2? 
020122 
020130 
020132 
020140 
020142 
02014*4 
020146 
020154 
020156 



104413 
00*4737 

QHQgoo 

000000 
023777 
177777 
023777 
177777 
000217 
000200 
023777 
000000 
10*4047 



020370 
000000 

177777 

177777 



000022 



000000 
177777 
177777 



T10 
10S: 



MULF TEST 



Ol-NOV-76 21:12 PAGE 7 4 



177777 000000 



IIS 
12S 
13$ 

15$: 
16$: 



CMP 
BNE 
CMP 
BNE 

MOV 

AOD 
JMP 



ERROR 
JMP 



ERROR 
BR 



(R0).20(R1) 
US 

2(R0),22(R1) 
IIS 

R1.R2 

•24.R2 

CR2i 



37 

26CR1) 



40 
13S 



;00ES THE INCORRECT RESULT 

; MATCH THE ANTICIPATED TnCORRE:* =EE~. 

; BRANCH IF NO. 

;IT MATCHEO SO RETURN TO THE ERROR 
: REPORT AT THE CALLING ROUTINE. 



;REPOR" RESULT INCORRECT. 



: REPORT FPS INCORRECT. 



000000 MULFT: .WORD 0.0,0,0 



EEEDONE: 



RSETUP ;G0 INITIALIZE THE FPS AND STACK; AND 

SEE IF THE 'JSER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G'). 



;ft**ft#ftft«*»***ft*ft#t**ft»t** #**#*»*#########*#***♦*##***♦#**##**** 

iTEST 11 MULD TEST 

♦THIS IS A TEST Of THE MULO INSTRUCTION. NOTE THAT A SUBROUTINE IS 
*USED TO SET UP THE OPERANDS, EXECUTE T*C MULD INSTRUCTION AND 
♦CHECK THE RESULTS. 
* 

•IHHHIHItmHIIIIimHHIHHHHHHHiHilHmHHHiH 

tSTll: SCOPE 

:MULD TEST WI T H AC POSITIVE AND FSRC POSITIVE. 
FFF1: 



IS 
2$ 
3$ 
4$ 
5$ 
6$ 



LPERR 

JSR 

.WORD 

.WORD 

.WORD 

217 
200 
,WC*D 

ERROR 



PC.aiMULDSUB 
40200,0,0,0 

23777,-1,-1,-1 

23777,-1.-1,-1 



23777.-1.0.0 
47 



SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 
RES 

FPS BEFORE EXECUTION. 
FPS AFTER ECECUTION. 
ERROR RES. 

BAD CONSTANT USED IN ALGORITHM 
USED 24 INSTEAD OF 56. 



MAIN0£C-11-DFS"PB-A POP 11 
DFFPBA.P11 01-N0V-75 2i:Cb 



KOb 

34 FPP DIAGNOSTIC PART 2 MACY11 27il006) 
Til MULD TEST 



Ol-NOV-75 21:12 PACE 




4079 
4080 
4081 
4082 
4083 
4084 

m 

4087 
4088 
4089 
409C 
4091 
4092 
4093 
4094 
4095 
409b 
4097 



4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 
4 

4112 
4113 
4114 
4115 
411b 
4117 
4118 
4119 
4120 
4121 
4122 
4123 
4124 
4125 
412b 
4127 
"128 
4129 
4130 

4i3l 

4132 

-r!32 

1 12 w 



08 
09 

10 

11 



oaoibo 
020150 

0201b2 
0201bb 

020204 
02020b 
020214 
02021b 
020220 
020222 
020230 
020232 



020234 

8S8SS 

020242 



02027b 
020304 
02030b 



020310 
020310 
020312 
02031b 
020324 
02032b 
020332 
02033b 
020344 
0203% 
020350 
020352 
020360 
0203b2 



104413 
004757 
065400 



17777b 
064777 
177777 
000247 
000240 
065000 
000000 
104050 



W9 

137577 



064777 
177777 
104051 



104413 
004737 
C17500 
000000 
123652 
125252 
1C:177 
177777 
000200 
000210 
103200 
000000 
104052 



020354 000167 



000202 
000000 


000000 


:NULO 
FFF2: 

IS: 


TEST WITH 

LPERR 

JSR 

.UORO 


BOTH OPERANDS POSITIVE TRUNCATION TE5 T . 

;SET UP THE LOOP ON EPROP ADDRESS. 

PC. MULDSUB 
65400,0,0,1 ;AC 


177777 


177777 


2S: 


.UORO 


37577,-1,-1,-2 ;FSRC 


177777 


177777 


31: 


.UORO 


54777,-1,-1.-1 ;RES 


000000 


000000 


4S: 
5S: 


247 
240 
.UORO 


;FPS BEFORE EXECUTION. 
:FPS AFTER EXECUTION. 
55000, 0,0.0 ; ERROR RES. 






bS: 


ERROR 


50 ; TRUNCATION ERROR. 


020370 
177777 


177777 


:MULD 
FFF3: 

IS: 


TEST UITH 

JSR 
.UORO 


BOTH OPERAfOS NEGATIVE IN ROUND MODE. 

;5ET UP THE LOOP ON ERROR ADDRESS. 

PC.atMULDSUB 

137577,-1,-1,-2 ;AC 


000000 


000000 


2S: 


.UORO 


155400,0,0,1 ;FSRC 


000000 


000000 


3S: 


.UORO 


55000,0.0,0 ;RES 


177777 


177777 


4S: 
5S: 


m 

.UORO 


54777,-1,-1,-1 ; ERROR RES. 






bS: 


ERROR 


51 ;ROUND ERROR. 


020370 
000000 


000000 


:MULD 
FFF4: 

IS: 


TEST UITH AC POSITIVE AND FSRC NEGATIVE IN ROUND NODE. 

LPERR ; SET UP THE LOOP ON ERROR ADDRESS. 

JSR PC.atMULDSUB 

.UORO 17500,0,0,0 ;AC 


125252 
125252 
177777 


177777 


2S: 
3S: 


.UORO 
.UORO 
.UORD 


123552,125252 ;FSRC 
125252 12S252 
103177,-1,-1.-1 ;RES 


000000 


000000 


4S: 
5S: 


200 
210 
.UORO 


:fps beforw execution. 
Sfps after execution. 

103200,0,0,0 ;ERR0R RES. 






bS: 


ERROR 


52 ; ROUND ERROR (BAD CONSTANT). 


00024C 






JMP 


FFFDONE 






:THIS SUBROUTINE. MULDSUB. IS CALLED TO SET UP. EXECUTE^ „ „ 
; AND CHECK THE RESULT OF A HULD INSTRUCTION, it IS CALLED THUS: 






1 

4 

» 


ACARG: 


JSR PC.3IMULDSUB 

.UORD X,X,X.X ;AC OPERAND 



LOb 



MAIfCEC-li-DfFPB-A 
DFFPBA.P11 Ol-NOV- 

4137 
4ij£ 

*m 

414C 
4141 
4142 
4143 
4144 
4145 
4146 
4147 

4148 
4149 
4150 
4151 
4152 
4153 
4154 
4155 
4156 
4157 
4156 
4159 
4150 
41bl 
4162 
4163 
4164 
4165 
4166 
4167 
4168 
4169 
4170 
4171 
4172 
u 173 
4174 
4175 
4176 
4177 
4178 
4179 
4180 
4181 
4182 
4183 
4184 
4185 
4186 
4187 
4188 
4189 
419C 



POP I! 34 FPP DIAGNOSTIC PORT 2 MACYli 27 (100b) 
76 21:06 Til MULD TEST 



01-NCV-7fe 21:12 PACE 7fc 



020370 
020372 
020376 

020400 
020402 
020404 
020410 

020412 
020420 
020422 



020430 
020432 
020436 

020440 
020444 

0204% 
020450 
020454 
020460 
020464 
020470 
020474 
020502 
020506 



012601 
012700 
170100 

010100 
172410 
016100 
17C1C0 

012737 
010100 
062700 



020426 171010 




170204 
012700 
170100 

012700 
174010 

010102 
010237 
062702 
010237 
062702 
010237 
012737 
010437 
016137 

010102 
062702 

012703 



FSRCARG 

RES: 

FPSB: 

FPSA: 

ERRES: 

ERR: 

CONT: 



. UORD 
.WORD 
.UORO 
.UORO 
.UORD 
ERROR 



X p X f X j X 
X i X p X , X 
X 
X 

X i X f X i X 
X 



;FSRC OPERAND 
•.EXPECTED RESIL" 
;FPS BEFORE EXECl"::' 
;FPS AFTER EXECU'Ij'i 
; ERROR RESULT 
; RESULT ERROR 
; RETURN ADDRESS 



THE OPERANDS ARE SET UP (USING ACO FOR THE AC OPERAND;. T HEN 
FPSB IS LOADED INTO THE FPS. THE INSTRUC T ION. MULD IS EXEOTED. 
AFTER THE EXECUTION THE RESULT IS CHECKED AGAINST THE 
EXPECTED CORRECT RESULT. RES. IF IT IS CORRECT THEN THE FPS 
IS CHECKED WITH THE EXPECTED CORRECT FPS. FPSA. IF THE FPS WAS 
INCORRECT THEN IT IS REPORTED. IF THE RESULT WAS INCORRECT IT 
IS COMPARED WITH ERRES IN AN ATTEMPT TO ANALYSE THE ERROR. IF 
THE INCORRECT RESULT HATCHED ERRES THEN CONTROL IS PASSED TO 
THE ERROR CALL AT ERR. IF THE INCORRECT RESULT DID NOT MATCH ERRES 
THEN THE FAILURE IS REPORTED IN MULDSUB AND CONTROL IS PASSED TC 
CONT. IF NO ERRORS ARE DETECTED THEN MULDSUB RETURNS CONTROL 
TO CONT. 



Q00200 
000030 

020426 001236 
000010 

000200 
020620 



001240 
000010 
001242 
000010 
001244 

020620 001246 
001250 

000032 001252 



MULDSUB: 



MOV 
LDFPS 

MOV 
LDD 
MOV 
LDFPS 

MOV 
MOV 
ADD 



MOV (SP) + ,R1 :GET A POINTER TO THE ARGUMENT'S. 

•200.R0 ;SET FD MODE. 

RO 



Rl.RO 
(RO).ACO 
30(R1),R0 
RO 

•1S.31STHP2 

Rl.RO 
•10, RO 



IS: 



000020 
020620 



MULD (RO),ACQ 

STFPS R4 

MOV t200,R0 

LDFPS RO 

MOV •MULDT.RO 

STD ACO,(R0) 

MOV R1.R2 

MOV R2.3«$TMP3 

ADO 110. R2 

MOV R2.5ISTMP4 

ADD I10.R2 

MOV R2.itSTMP5 

MOV •MULDT,3l$TMP6 

MOV R4 1 3t$THP7 

MOV 32(R1),3ISTMP10 

MOV R1.R2 

ADD «20,R2 

MOV «MULDT,R3 



;SET UP THE ACO OPERAND. 
;L0AD THE FPS. 

; ESTABLISH A POINTER TO FSRC. 

; EXECUTE THE TEST INSTRUCTION. 

;GET THE FPS. 
J SET FD MODE. 

;GET THE RESULT. 

;SAVE DATA IN CASE OF ERROR. 



; CHECK THE RESULT. 



M0& 



TMlNDeC-li-DfFP8-A PDP II- 34 FPP DIAGNOSTIC PART 2 MACY11 27(1006) 01-N0V-76 21:12 PACE 77 

DFFPBA.P11 01-N0V-76 21:06 Til flULD TEST 



4191 
4192 
4193 
419H 
4195 
41% 
4197 
4198 

$3 

4201 
4202 
4203 
420M 
420S 
420fe 
4207 
4208 
4209 
4210 
4211 
4212 
4213 
4214 
4215 
421b 
4217 
4218 
4219 
4220 
4221 
4222 
4223 
4224 
4225 
4226 
4227 
4228 
4229 
4230 
4231 
4232 
4233 
4234 
4235 
423b 
4237 
4238 
4239 
4240 
4241 
4242 
4243 
4244 
4245 
42% 



020526 
020532 
020534 
020536 

020540 
020544 

020546 

020552 
020554 
020560 
020564 
020570 
020572 
020574 
020576 
020600 



01270S 
022223 
001006 
077503 

026104 
001023 
000161 

010102 
062702 
012703 
012705 
022223 
001005 
077503 
010102 
062702 



020604 000112 



020606 
020606 
020610 

020614 
020614 
020616 

020620 
020626 

020630 
020630 



104246 
000161 



104046 
000774 

000000 
000000 



104412 



020632 000004 



020634 

020634 104413 
020636 004737 



000004 

000032 
000046 



000034 
020620 
000004 



000044 



000046 



25: 



10S: 



11$: 



12S: 
13$: 
141: 

15S: 
IBS: 



MOV 
CMP 
BNE 
SOB 

CMP 
BNE 
JMP 

MOV 
AOD 
MOV 
MOV 
CMP 
BNE 
SOB 
MOV 
ADD 

JMP 



ERROR 
JMP 



ERROR 
BR 



»4.R5 

(R2H, (R3j + 

10S 

RS,2$ 

32(R1),R4 
15S 

46(R1) 

R1.R2 
i34,R2 
iMULOT , R3 
•4.R5 

12S 

R5,ll$ 
Rl>2 
•44, R2 

(R2) 



24b 
46(R1) 



4b 
14S 



; BRANCH IF RESULT INCORRECT. 

;IS FPS CORRECT' 

; BRANCH IF INCORRECT. 

; RETURN. 

;UAS INCORRECT RESULT ANTICIPATED' 



; BRANCH IF NO. 

;IF THE INCORRECT RESULT WAS 
; ANTICIPATED RETURN TO THE 
ERROR REPORT IN THE CALLING 
; ROUTINE. 

; REPORT RESULT INCORRECT. 



;RE?C4T FFS INCORRECT. 



000000 000000 MULDT: .UORD 0,0,0,0 



FFFDONE: 



021060 



RSETUP ;G0 INITIALIZE THE FPS AND STACK; AND 

SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G'). 



♦TEST 12 UNDERNOVER FLOW, USING MULF WITH TRAPS DISABLED. TES T 

*THIS IS A TEST OF THE OVERFLOW AND UNDERFLOW CONDITIONS USING 
*THE MULF INSTRUCTION WITH TRAPS DISABLED. NOTE THAT A SUBROUTINE 
*IS USED TO SET UP THE OPERANDS, EXECUTE THE MULF INSTRUCTION AND 
*CHECK THE RESULTS. 
* 

TST12: SCOPE 

[UNDERFLOW, WITH EXPONENT OF RESULT = -129 
till" 

LPERR ; SET UP THE LOOP ON ERROR ADDRESS. 

JSR PC,3lOVUNFNT 



1AINDEC-11-DFFPB-A 
DFFPBfi.Pll 01-N0V-?b 21:0fa 



NDb 

POP 11 34 FPP DIAGNOSTIC PART 2 MACY11 27(100b) 01-N0V-7b 21:12 PAGE 78 



T12 UNDER\OVER FLOW, USING MULF WITH TRAPS DISABLED, TEST 



4247 
4248 
4249 

5H? 

42S2 
4252 
4254 
42SS 
4£5b 
42S7 
42S8 
42S9 
42b0 
4261 
4262 
4263 
4264 
4265 
4266 
4267 
4268 
4269 
4270 
4271 
4272 
4273 
':274 
4275 
4276 
4277 
4278 
4279 
4280 
4291 
4282 
4283 
4284 
4285 
428b 
4287 
4288 
4289 
4290 
4291 
H292 
4293 
4294 
4295 
42% 
4297 
4298 
4299 
4300 
4301 
4302 



020642 
0206% 
020652 



020664 
020666 
020670 
020672 
020674 
020676 
020700 



020700 
020700 
0 2070 2 
020706 
020712 
020716 
020722 
020726 
020730 
020732 
020734 
020736 

020740 
020742 
020744 



020744 

020744 

0207% 

020752 

0207' 

0207c 

0207E6 

020772 

0207— 

020^76 

021000 

021002 

021004 

021006 

021010 



021010 
021010 
021012 
021016 
021022 
021026 
021032 



020200 
020000 
000000 
177777 
000000 
000004 
000012 
177777 
104117 
000401 
104114 



104413 
004737 
010200 
010000 
000000 
010000 
005013 
005004 
000012 
177777 
104120 

000401 
104114 



104413 
004737 
060200 
~<.nooo 
'00 
06,. JO 
000000 
000006 
000010 
000000 
104121 
000401 
104113 



104413 
004737 
060200 
060200 
000000 
177777 



000000 
000000 
000000 

177777 



021060 
000000 
000000 
000000 
000000 



021060 
000000 
000000 
000000 
000000 



021060 
000000 
000000 
000000 
177777 



IS: 
2S: 
3$: 
41: 
SS: 

bS: 

7S: 

8$: 



.WORD 

.WORD 

.WORD 

.WORD 

0 

4 

12 
.t 

ERROR 
BR 

ERROR 



20200,0 
20000,0 
0,0 
-1,-1 



117 

8$ 

114 



AC 

FSRC 
RES 

fpS°BEF^E EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

ST 331 TO 155 INTO 115 (BUT FIU) 



: UNDERFLOW, WITH EXPONENT OF RESULT 
1 1 12 



■193 



IS: 
2S: 
3S: 
4S: 
SS: 

bS: 

7S: 



8S: 



LPERR 
JSR 
.WORD 
.WORD 
.WORD 
.WORD 
5013 
5004 
12 
-1 

ERROR 
BR 

ERROR 



PC.3I0VUNFNT 
10200,0 
10000,0 
0.0 

loooo, n 



120 



8S 

114 



;SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSPC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

SETTING FIUV OR FIV CAUSES TRAP 
WITH FIU CLEAR. 



: OVERFLOW, EXPONENT OF RESULT = 128 
tlI3: 



IS: 
25: 
3S: 
4S: 
SS: 

bS: 

7S: 

85: 



LPERR 
JSR 
.WORD 
.WORD 
.WORD 
.WORO 
0 
b 
10 
0 

ERROR 
8R 

ERROR 



PC.3I0VUNFNT 
60200,0 
bOOOO,0 
0.0 

bOOOO.O 



121 
8S 

113 



;SET UP THE LOOP ON ERROR ADDRESS. 

AC 

FSRC 

RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

ST 333 TO 13b INTO lib (BUT FIV). 



: OVERFLOW, EXPONENT OF RESULT - 130 
III4- 

' LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 

JSR PC.3I0VUNFN T 



IS 
2S 
3S 
4S 



.WORD 
.WORD 
.WORD 
.WORD 



b0200,0 
b0200,0 
0,0 

-1,-1 



AC 
FSRC 
RES 

ERROR RES. 



BO 



:*«Bh.pii 



OI-NCV 



po*> :; 

*fc 2l:Cb 



4303 
4»>* 
4305 

a» 

•4308 
^309 

•4310 
•4311 
■*312 
4313 
-•214 
-»3I5 
4316 
•4317 
4319 
4319 
432C 
4321 

432*4 
4325 
432* 
4327 
4326 
4329 
433C 
4331 
4332 
4332 
4334 
4335 
423fc 
4337 
4338 
4339 
43MC 

4341 

4342 
4343 
4344 
4345 
43% 
43*47 
*34€ 
4349 
435C 
4351 
4352 
4353 
4354 
4355 
435fc 
4357 
4352 



S21C36 
021042 

221054 



oosci: 

jubOOb 
000012 

oooooc 

104122 

000401 
104113 

30C»b< Ow34 * D 



24 cpp CIAGNCS 
T12 

S5. 

bS: 

71: 



95: 



021080 
021062 
0210M> 

021070 
021072 



012601 

012700 000200 
170100 

010100 
172M10 



: PART 2 MAC f II 27(10061 0l-NOV-7b 21:12 PAGE 79 
UNDERCOVER FLOW. USING I1ULF WITH TRAPS DISABlEC TE: 



bull 
BOOfc 
10 
0 

ERROR 
BR 

ERROR 
JTP 



8S 

113 

IIIDOfC 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

SETTING FIUV OR Flu WITH 
FIV CLEAR CAUSES T RAP. 



;G0 TO NEXT T EST. 



THIS SUBROUTINE, OVJNFNT, IS LSED TO SET JP THE OPERANDS. EXECUTE 
THE ftJlF INSTRUCTION AND CHECK THE RESULTS OF AN INSTRUCTION UITH 
OPERANDS WHICH SHOULD RESULT IN EITHER OVERFLOW OR UNOERFLOW. A CALL 
TO IT IS NAOE THUS: 

AC OPERAND 
FSRC OPERAND 

FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
EXPECTED FEC 

0/-1. OVER/UNDER FLOW FL^G 
TRAP ERROR. 

RESULT ERROR 



RCARG: 


.WORD 


X.X 


FSRC ARC: 


-UORD 


X.X 


RES: 


.WORD 


X,X 


ERRES: 


.WORD 


X,X 


C PSB: 


.WORD 


X 


FPSA: 


.WORD 


X 


FEC: 


.WORD 


X 


FLAG: 


.WORD 


X 


ERRi: 


ERROR 


X 


BR 


CONT 




ERR2: 


ERROR 


X 


CONT: 







; DATA, RESULT El 
; RETURN ADDRESS 



THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR ) . THEN 
THE NULF INSTRUCTION IS EXECUTED. IF NO TRAP OCCURS THEN THE 
RESULT IS CHECKED AGAINST RES IF THE RESULT IS CORRECT THEN THE FPS 11 
COMPARED WITH FPSA IF THIS TOO IS CORRECT OVUNFNT RETURNS CONTROL 
TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD OVUNFNT 
REPORTS THIS FAILURE AMD THEN RETURNS TO CONT. IF THE RESULT OF THE 
NULF IS INCORRECT THE INCORRECT RESULT IS COMPARED WITH THE 
ANTICIPATED FAILING DATA PATTERN, ERRES. IF THE FAILURE IN 
THE RESULT WAS ANTICIPATED COSRECTLYTO BE ERRES THEN OVUNFNT 
WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR2. OTHERWISE THE 
RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND OVUNFNT WILL 
REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 
IF A TRAP OCCURS (IT SHOULD NOT) THEN OVUNFNT WILL READ THE FEC. 
SHOULD THE FEC NATCH THE ANTICIPATED FEC OVUNFNT WILL 9 _ 
STORE ALL DATA AND TRANSFER CONTROL TO THE ERROR CALL AT ERRI. 
FEC IS NOT THESAME AS THE ANTICIPATED FEC OVUNFNT WILL REPORT 
" ERROR AND RETURN TO CONT. NOTE THAT OVUNFNT USES THE FLAG 



IF THE 



THE 



TO TELL WHETHER OR NOT THESE 
UNOERFLOW (FLAG=-U OR OVERFLOW 



PARTICULAR OPERANDS WILL RESULT IN 
(FLAGsO). 



OVUNFNT: 



NOV 
LDFPS 

NOV 

LDO 



NOV 

1200 ,R0 
RO 

Rl.RO 
(RO).ACO 



(SP)+,R1 



;SET FD NODE. 



GET A POINTER TO THE ARGUMENTS. 



;LOAD ACO. OPERAND. 



■Kifce:-n-oFFPB-« 



01-NOV-76 21:26 



C07 

POP 11 34 FPP DIAGNOSTIC PART 2 NACY11 27(1006) 01-N0V-76 21:12 PAGE eC 



T12 



Uf©EK\OVER FLOW. USING MULF WITH TRAPS DISABLED. TEST 



4359 
4360 
4361 
4362 

38 

4365 
4366 

4368 
4369 
4370 
4371 
4372 
4373 
4374 
4375 
4376 
4377 
4378 
u 379 
438C 
4381 
4382 
4383 
4384 
4385 
4386 
4387 
4386 
4389 
4390 
4391 
4392 
4393 
439M 
4395 
43% 
4397 
4398 
4399 
4400 
4401 
4402 
4403 
4*404 
4405 
4406 
4407 
44QB 
4409 
441C 
4411 
*41c 
4412 
«4> 



02107M 
021076 
021102 

BliB 

021116 
021122 
021130 

321136 
021142 
021144 
021152 

021160 
021162 



010102 
010237 




021170 
021172 
021174 
021200 
321202 
021206 
021210 
021214 

021220 
021224 
021226 

0212: 

02 If 
021240 
0212M2 

021244 
021250 



021256 
021262 



021264 
021266 

021270 
021270 
321272 



010237 
016137 
012737 

016100 
170100 
012737 
012737 

01010C 
062700 



021166 171010 



170204 
173305 
012700 

012700 
17M010 
010M37 
010537 

012700 
010102 
062702 
012703 
022022 
001015 
077303 

026104 
001002 



021252 000161 



005761 
001002 



104111 
000771 



104112 
000767 



001240 
000004 

" 2 



001244 
000022 
021460 

000020 

021166 
021352 



000004 



300200 

021460 

001250 
0012S4 

021460 

000010 
000002 



00OC22 
0C0Q36 
000026 



001252 
001246 



001236 
000244 



11: 
2S: 



3S: 



4$: 



MOV R1.R2 

MOV R2,3l$TNF3 

ADD 14, R2 

MOV R2.SISTMP4 

ADC 14, R2 

MOV P^.ailTMPS 

MOV 22[Rl).aiiTMPlO 

MOV lOVFNTl . SlSTMPb 

MOV 20(RD,R0 

LDFPS RO 

MOV IH.3ISTMP2 

MOV l25i,aiFPVECT 

MOV Rl.RO 

ADD 14, RQ 

MULF (RO),AC0 



STFPS 

5TST 

MOV 

LDFPS 

MOV 

STO 

MOV 

MOV 

MOV 
MOV 
ADO 
MOV 
CMP 
BfC 
SOB 

CMP 
BNE 

JHP 



;SAVE THE DATA PATTERNS IN CASE OF 
; ERROR. 



R4 
RS 

•200.RO 
RO 

•OVFNTT.RO 
AC0.(RO5 
HM.4HTMP7 
RS.atSTHPll 

•OVFNTT.RO 
R1.R2 
•1&.R2 
•2.R3 

<R0H,(R2) + 

15S 

R3.3S 

22<R1),RH 
10S 

36(R1) 



: REPORT INCORRECT FPS. 
lOS: TST 26(RD 
BNE 12S 



11$: 



12$: 
13$: 



ERROR 
BR 



ERROR 
BR 



111 
4$ 



112 
4$ 



;LOAD THE FPS. 



; SET UP THE FP TRAP SECTOR IN CASE 
;0F ERROR. 

; COMPUTE THE AOORESS OF FSRC. 



021274 0127X 021460 



: RESULT INCORRECT. 

lS$: MOV •OVFNTT.RO 



;TEST INSTRUCTION. 

;GET FPS. 
;GET FEC. 
;SET FD MODE. 

;GET THE RESULT. 



; CHECK THE RESULT. 



; BRANCH IF INCORRECT. 

;HAS FPS CORRECT' 

; BRANCH IF FPS IS INCORRECT. 

; RETURN. TEST COMPLETED. 

;UAS THE RESULT OVER OR UNDER FL3U" 
•.BRANCH IF UNDERFLOW. 

; REPORT FPS BAD AFTER OVERFLOW. 



; REPORT FPS BAD AFTER UNDERFLOW. 



;SEE IF FAILURE IS ANTICIPATED 



DO' 
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HM15 


uclJUU 


oini no 
J.UlUc 




LIU T C_ 


UclJDc 


3oc7uc 




03) 1 aOC. 

JclJUb 


Ulc< UJ 


o/W>n3 


1 1 i ! Q 


UCl JlC 


naanaa 
UccUee 




■ 111 f Q 


no i o i u 
UclJlH 


no i rvr^ 
UUlU.' 




. ii t v> 


no i iit 
UclJlb 


077303 




IILI ^ 1 

4**Cl 








1 1 . i 


no i oof) 
UclJcC 


n i n ? fta 

nca^na 
UOC' Uc 






no i "ioo 
Jcl Jcr 


onnnou 


«l4i3U 


no i aac 
Jcl Jet 


n i nooy 
i-lUcJ/ 


Julz Jo 


"♦"1C3 


no t ooo 
Jcl JJc 


mn i i 2 
JL7J1 lc 












*rlc< 


f!3 ' "Xi 




LSJJUcb 


.IU3G 








▼'CI 








™Jw 








. 1 1 j "3 i 

•rlJl 












UulwiuC 




OUT} 
















in -JC 


no i aua 
UclJMe 


1 Ou • 1 1 

1 J***! J 




*r1Jb 


na i auu 
Uci J*rl 


n/viTua 
UUU/HC 




•4*437 








441Q 


na i >ir 

UCI JtO 






1111 -JQ 

•4*1 Ja 


no i out* 
Jcl fib 


1 OU 1 1 Li 




ij inn 


Uci SOU 


UULVMU 




i i. i i i | 








*4*ric 








t*T*1J 


Uci AC 


Ullbuc 




■ ii ii ii i 
ii "if 


na i -jcu 


no d 7 no 


na i i "7n 
Uci 1/U 


1 1 1 ii *r 

jiiyf 
1 1 \\i 


Uci Jou 


nni una 




nai Tjca 
Uci Joe 


UUUi J/ 


nxt i u 
UJooi" 


UUU7 








1 1 1 ii 
1 1 ffQ 


na i xi 
uci Joe 


uccoco 




I ii iiiW 

' * 1 J 


no 1 T7fl 
UCI J/U 


n i noorr 

U1UCJ' 


nn i a at 

UUlCJo 


' ibu 


na 1 T7U 
UCI J' 1 


1 TTL30U 




UUC 1 


no i arrt 

Uci J/D 


i more 
1 f UJLo 




UUC3 


no i urm 

UC1*HJU 


n 1 37 nn 

UlC' UU 


nnnann 


llll«"l 
' 'IlJ 


ro i unu 


i toi nn 




't''3*1 


uci*njo 


n i a?no 
Ulc'Uu 


ns i ucji 




UC1~1C 


i Tun i n 

l l TUlU 






no i u i u 




nn t acu 




no i u an 

UCi~CU 


UCU301 


nrgynou 




no i usu 


noirmu 

UUlUU*i 




•4UCQ 

its" 








■iiir_n 

' IIXJ 


UC1~CB 


n i n i na 

U1U1UC 




liUf. 1 


no i uan 
UCHJU 


UbC' UC 


nnnnan 

UUUUJU 


4*462 








H%3 


02143M 


000112 




■*%4 








"%S 


021436 


005761 


000026 


1 'UCI 








4%7 








»+%8 


3214M2 


001003 




W5 








H-»72 









Tl = 



LfcS: 



UNDERCOVER FLOW. USING NULF UITH TRAPS DISABLED. TES T 



17S: 



IBS: 



191: 
201: 



nov 

ADD 

nov 

CMP 
BNE 
SOfi 

NOV 
ADO 
MOV 
JHP 

TST 



BNE 



ERROR 
BR 



ERROR 
BR 



R1.R2 

■1^.R2 

•2.R3 

(R0X-. (P2-* 
171 

R3.16S 
R1.R2 

R2.iifTNP2 

CRc?J 

26(R1! 



19$ 



113 



114 
MS 



;FAILJRE. 



; BRANCH IF NOT ANTICIPATED. 



ERROR WAS ANTICIPATED SO RETURN 
TO THE ERROR REPORT IN THE CAlLIn; 
ROUTINE. 



RESULT WAS NOT ANTICIPATED 
SO ERROR NUST BE REPORTED HERE. 
FIRST SEE IF ARGUMENTS SHOULD 
HAVE RESULTED IN OVERFLOW OR JNDE 0 
FLOW BY LOOKING AT THE FLAG. 
BRANCH IF UNDERFLOW EXPECTED. 

REPORT RESULT INCORRECT. EXPECTING 
OVERFLOW. 



; REPORT RESULT INCORRECT, EXPECTING 
•.UNDERFLOW. 



:IF AN FP TRAP XCURS CONE HERE. 

2SS. NOV (SP).R2 
CNP I2S.R2 
BEQ 26S 
JNP 3IFPSPUR 



261: CNP 
NOV 
STFPS 
STST 
NOV 
LDFPS 
NOV 
STD 
NOV 
CNP 
BNE 

NOV 
ADD 

JNP 

27$: TST 



BNE 



(SP)*. (5PH 

R2.3ISTMP2 

RM 

RS 

•200.R0 
R0 

t0VFNTT.R0 

AC0.(R0) 

R5,6tSTMPll 

R5.2M(R1) 

27i 

R1.R2 
i36.R2 

(R2) 

26(R1) 



2<3J 



GET ADDRESS OF TRAP. 

WAS THE TRAP DURING THE NULF INSTRUCTION" 
BRANCH IF YES. 

OTHERWISE GO REPORT A SPURIOUS 
FP TRAP. 

RESET THE STACK. 

SAVE DATA FOR ERROR REPORT. 

GET FPS. 

GET FEC. 

SET FD NODE. 

GET THE RESULT. 



;WAS THE FEC ANTICIPATED' 
; BRANCH IF NOT ANTICIPATED. 

; ERROR WAS ANTICIPATED SO 
: RETURN TO THE ERROR REPORT OF THE 
CALLING ROUTINE. 



: THE ERROR WAS NOT ANTICIPATED SO 
IT NUST BE REPORTED HERE. FIRST SEE IF EXPECTED 
; OVERFLOW OR UNDER FLOW. 
; BRANCH IF EXPECTING UN0ERFL0W 

; REPORT TRAPPED ON OVERFLOW WITH FIV=C 
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4471 
4472 
4473 
4474 
4475 
4476 
4477 
4478 
4479 
4480 
4481 
4482 
4483 
4484 

4485 
4486 

, II IIW 

' 'Bo 
4489 
44* 
4491 
44« 
4493 
4494 

^ 
44% 

44S7 

4498 

4499 

4500 

4501 

4502 

4503 

4504 

4505 

4506 

4507 

4506 

4509 

4510 

4511 

4512 

4513 

4514 

4515 

45Ifc 

4517 

4518 
4519 
4520 
4521 
4522 
4523 
4524 
4525 
i52fc 



C21444 
021446 

021452 
021452 
021454 

02146C 
321466 

021470 
021470 



134115 
330161 



104116 
00C161 

oooooc 

000000 



134412 



021472 000004 



021474 
021474 
021476 
021502 
021506 
021512 
021E20 
021522 
021530 
021532 
021536 
021542 
021544 
021546 
021550 
021552 

§11112 

021560 



021562 



104413 
004737 
020200 
127272 
020000 
000000 
000000 
000000 
000000 
127272 
000200 
000204 
0 00012 
177777 
104131 
000401 
104132 



104413 
004737 



003036 



Tic 
28S: 



291: 
30S: 
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UNDERCOVER FLOW, USING HULF WITH TRAPS OISABlED. TEST 



ERROR 
JMP 



ERROR 
JMP 



003036 

OOOOOC 000000 CVFNTT: .WORD 



115 

36CRD 



116 

36CRD 
0.0.0.0 



; REPORT TRAPPED ON JNDER FLOW Jl'i ?I- 



022020 
000000 
000000 



000000 

000000 
000000 



000000 
000000 



IIIDONE: 



RSETJP 



AtC 



GO INITIALIZE THE FPS AND S T ACK; 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER .Hfi 
THE USER TYPED CONTROL G' . . 



■ *************************************************************** 

iTEST 13 UNDER\OVER FLOW, USING NOLO WITH TRAP DISABLED. TES" 

♦THIS IS A TEST Of THE OVERFLOW AND UNDERFLOW CONDITIONS THAT CAN 
♦ARRISE USING THE NULD INSTRUCTION WITH TRAPS DISABLED. A SUBROUTINE 
♦USED rO SET UP THE OPERANDS. EXECUTE THE NULD INSTRUCTION AND 
♦CHECK THE RESULTS. 
* 

•####♦#»##*#♦#*#*#****###***♦#*#♦***#*#####♦#*#####*#####*♦**#** 

TST13: SCOPE 



L UNDERFLOW, EXPONENT OF RESU.T=-129 





LPERR 




JSR 


IS: 


.WORD 




.WORD 


2S: 


.WORD 


31: 


.WORD 


4S: 


.WORD 




.WORD 


5$: 


200 




204 


6$: 


12 




-1 


7S: 


ERROR 




BR 




ERROR 



85: 



PC.StOVUNONT 
20200.0 
12727c\0 
20000,6,0,0 

0,0,0,0 

0.0 

1^7272,0 



131 

ei 

132 



SET UP THE LOOP ON ERROR AOORESS. 
AC 

FSRC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

ST 331 TO 155 INTO 115 (BUT FlUi 
ST 115 (BUT FD) 



022020 



: UNDERFLOW, EXPONENT OF RESULT = -193 
jtj?. 

LPERR ;SET UP THE LOOP ON ERROR ADDRESS. 

JSR PC,3lOVUNDNT 



4527 
4528 
4529 
4530 
H531 
4532 
H533 
4534 



4537 
4538 
453<3 
4540 
4541 
4542 
4543 
4544 
4545 
4546 
4547 
4546 
4549 
4550 
4551 
4552 
4553 
4554 
4555 
4556 
-557 
4558 
4559 
4560 
4561 
45b2 
4563 
4564 
4565 
4566 
4567 
4568 
4569 
457Q 
4571 
4572 
4573 
4574 
457S 
4576 
4577 
4578 
4579 
4580 

45ei 

4=82 
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C21566 
021572 
021576 
021604 
021606 
021614 
02161b 
021624 

8§i& 

021632 
021634 
021636 
021640 
021642 
021644 



021644 
021644 
02lb% 
021652 
021656 
021662 
021670 
021672 
021700 
021702 
021710 
021712 
021714 
021716 

021724 
021726 
021730 



021730 
021730 
021732 
021736 
021742 
0217% 
021754 
021756 
021764 
021766 
021774 
021776 
022000 
022002 
022004 
022006 



010200 
123456 
010000 
000000 



I I Mil I 

i'iVi.i i 



000000 
000000 

13 



0 00012 
177777 
10M133 
000401 
104132 



104413 
004737 
063200 
065432 
060000 
000300 

opopoo 

000000 
000000 
000000 
000200 
000206 
000010 



104134 
000401 
104135 



000000 
000000 
000000 

000000 

000000 



022020 
000000 
000000 
000000 

000000 

000000 



000000 
000000 
123456 



000000 
000000 
065432 



T13 

IS 

2S 

3$ 

4S 

SS 

bS 

7S 

8S: 



UNDER\OVER flow, using nuld with trap disabled. t es t 

;AC 
;FSRC 
;RES 

; ERROR RES 



.WORD 
.WORD 
.WORD 



10200.0 

123456.0 

10000.6,0.0 



.WORD 
.WORD 



0,0,0,0 
0,0.123456.0 



12 
-1 

ERROR 
BR 

ERROR 



133 
8S 

132 



: OVERFLOW, EXPONENT OF RESULT 
JJJ3: 



IS 
2S 
3S 
4S 
5S 
bS 
7S 

8S: 



LPERR 
JSR 
.WORD 
.WORD 
.WORD 

.WORD 

.WORD 

200 
206 
10 



RROR 
BR 

ERROR 



PC.atOVUNDNT 
60200,0 

60000^0,0.0 

0,0,0,0 

0,0,65432,0 



134 
8S 

135 



104413 








LPERR 


004737 


022020 






JSR 


060200 


000000 




IS: 


.WORD 


125252 


000000 






.WORD 


060200 


000000 


000000 


2S: 


.WORD 


000000 










000000 


000000 


000000 


3S: 


.WORD 


000000 










000000 


cooooo 


125252 


4S: 


.WORD 


000000 










006211 






5S: 


6211 


006206 








6206 


000010 






6S: 


10 


000000 








0 


104136 






7S: 


ERROR 



PC.atOVUNDNT 
60200.0 
125252.0 
60200,6,0.0 

0,0,0,0 

0,0,125252,0 



136 



FORE EXECUTION. 
TER EXECUTION. 



FPS 
FPS 
FEC 
FLAG 

SETTING FIUV OR FIV BAD. 



ST 115 (BUT FD> 
128 

SET UP 'HE LOOP ON ERROR AOORESS 
AC 

FSRC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 

sY^S TO 136 INTO 116 .BUT FIV 1 
ST 116 (BUT FD) 



; OVERFLOW, EXPONENT OF RESULT = 130 
JJJ4 



SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

SETTING FIUV OR FIV BAD. 



GO* 



•KifCCC-ii-DFPPB-s pop :: 
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4583 
4584 
4585 



4586 

51 

4591 
4592 
*S93 
-694 
■+595 
45% 
4597 
4599 
4599 
■+BC2 
4fcCl 

3SS 

'www 

-<eOS 
-6C 



ts.c 

-fell 

H5I7 

45ie 

4519 
4520 
4621 
4622 
4623 
4624 
4625 
4626 
4627 
4626 
4629 
4630 
4631 
4632 
4633 
4634 
4635 
4636 
4637 
4636 



C22010 0C04C1 
022012 124:35 
022014 000137 C2243C 



022020 
022022 
022026 

022030 
022032 

022034 
022036 
022042 
0220% 
022052 
022056 
022062 



012601 
012700 
170100 

010100 
172410 

010102 
010237 
062702 
010237 
062702 
010237 
016137 



000200 



001240 
000010 
001242 
000010 
001244 
000042 



8$: 



BR 8$ 

ERROR 135 ;ST 
JMP 3UJJD0NE ;G0 



116 (BUT FO) 
TO NEXT TES T . 



THIS SUBROUTINE. OVUNDNT, IS USED TO SET UP THE OPERANDS, EXECUTE 
THE F1ULD INSTRUCTION AND CHECK THE RESULTS OF AN INSTRUCTION UITH 
OPERANDS WHICH SHOULD RESULT IN EITHER OVERFLOW OR UNOERFLOU. A :o. 
IDE 



TC IT IS MADE THUS: 



ACARG: 

F5RCARG: 

RES: 

ERRES: 

F p SB: 

FPSfi: 

FEC: 

FLAG: 

ERR1: 

BR 

ESS! 



.WORD 

.WORD 

.UORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

ERROR 

CONT 

ERROR 



X , X t X i X 

X a X i X i X 

X i X f X i X 

X • X i X ( X 

X 

X 

X 

X 

X 



AC OPERAND 

F5RC OPERAND 

EXPECTED RESUL T 

ERROR RESULT 

FPS BEFORE EXECUTION 

FPS AFTER EXECUTION 

EXPECTED FEC 

0/-1, OVER/UNDER FLOW FLA 
TRAP ERROR. 



•RROP 



THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR) . THEN 

THE NULD INSTRUCTION IS EXEOFED. IF NO TRAP XCURSTHEN THE 

RtSJLT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS I: 

COMPARED WITH FPSA IF 'HIS TOO IS CORRECT OVUNDNT RETURNS CONTRCL 

T 0 THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD OVUNDNT 

REPORTS THIS FAILURE ANO THEN RETURNS TO CONT. IF THE RESULT OF HE 

MULD IS INCORRECT. THE INCORRECT RESULT IS COMPARED UITH THE 

ANTICIPATED FAILING DATA PATTERN. ERRES. IF THE FAILURE IN 

THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN OVUNDNT 

WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR2. OTHERWISE THE 

RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND OVUNDNT WILL 

REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 

IF A TRAP OCCURS (IT SHOULD NOT) THEN OVUNDNT WILL READ THE FEC. 

SHOULD THE FEC MATCH THE ANTICIPATED FEC OVUNONT WILL _ 

STORE ALL DATA AND TRANSFER CONTROL TO THE ERROR CALL AT ERR1. IF J E 

FEC IS NOT THE SAME AS THE ANTICIPATED FEC OVUNDNT WILL REPORT 

THE ERROR ANO R£ T URN TO CONT. NOTE THAT OVUNDNT USES THE FLAG 

TO TELL WHETHER OR NOT THESE PARTICULAR OPERANDS WILL RESULT IN 

UNDERFLOW (FLAG=-1 ) OR OVERFLOW (FLAG=0). 



OVUNDNT : 



001252 



MOV 
LDFPS 

MOV 
LOO 

MOV 
MOV 
ADD 
MOV 
ADD 
MOV 
MOV 



MOV ISPH.R1 :GET A POINTER TO THE ARGUMENTS. 

•200.R0 ;SET FD MODE. 

RO 



Rl.RO 
(R6),AC0 

R1.R2 

R2!ai|TMP3 

•l6.R2 

R2.3IITMP4 

•10.R2 

R2.3HTMPS 

42'Rl),a§STMPlO 



;LOAO ACO, OPERAND. 

;SAVE THE DATA PATTERNS IN CASE OF 
; ERROR. 



"*:riDe:-i:-D«"P8-A pop n 

Z^rpBA.Fi' 31-NCV-76 21:9b 
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T13 



UNDERxOVER FLOW, USING MUlD WITH TRPP DISABLED. TEST 



%39 
%40 
%41 
%42 
%43 
%4M 

%45 
4fa% 
%47 
%48 
%49 
%5C 
%51 
%S2 
%53 
%54 
%55 
%S6 
%S7 
%58 
%59 
4660 
4661 
4662 
4663 

4664 
4665 

4666 
4667 
4668 
4669 
%7C 
4671 
-*672 
4673 
4674 
4675 
4676 
4677 
4678 
4679 
4680 
4681 
4682 
4682 
4684 
4685 
4686 
4687 
4688 
4689 
%90 
4691 
4692 
4693 

469H 



022070 012737 



022076 
022102 
022104 
022112 

022120 
022122 



022134 
022140 
022142 
0221% 
022150 
022154 

022160 
022164 
022166 
022172 
022176 
022200 
022202 

022204 
022210 



022216 
022222 



022224 
022226 

022230 
022230 
022232 



022234 
022240 
022242 
0222% 
022252 
022254 
022256 



016100 
170100 

012737 

01010C 
062700 



022126 171010 



1 
1 

012700 
17010C 
012700 
174010 
010M37 
010537 

012700 
010102 
062702 
012703 
022022 
001015 
077303 

026104 
001002 



022212 000161 



005761 
001002 



104123 
000771 



104124 
000767 



012700 
010102 
062702 
012703 
022022 
001007 
077303 



022420 

000040 

022126 
022312 

noon in 



000200 

022420 

0012S0 
001254 

022420 

000020 
000004 



000042 
000056 
000046 



022420 

000030 
000004 



CO 1246 



001236 
000244 



1$: 
2S: 



MOV tOVDNTT.aiiTHPb 

MOV 40(R1),R0 

LDFPS RO 

MOV I1S.2ISTMP2 

MOV «2S$,3lFPVECT 

MOV Rl.RO 

ADD «10,R0 

MULD (RO),ACO 



3$: 



4$: 



STFPS 

STST 

MOV 

LDFPS 

MOV 

STD 

MOV 

MOV 

MOV 
MOV 
ADO 
MOV 
CMP 
BNE 
SOB 

CMP 
BNE 

JMP 



R4 
R5 

1200, RO 
RO 

KOVDNTT.RO 
AC0.(R05 
R4,JlSTMP7 
R5,3tlTMPll 

•OVDNTT.RO 
R1.R2 
•26.R2 
•4.R3 

(ROH, (R2) + 

15S 

R3.3S 

42(R1).R4 
10S 

Sb(Rl) 



REPORT INCORRECT FPS. 



lbs 



11$: 



12S: 
13S: 



TST 
BNE 



ERROR 
BR 



ERROR 
BR 



46(R1) 

lis 



123 
4$ 



124 
4S 



RESULT INCORRECT. 



Is* 



16$: 



02C260 010102 



MOV 
MOV 
ADD 
MOV 
CMP 
BNE 
SOB 

MOV 



•OVDNTT.RO 
R1.R2 
•30.R2 
•4.R3 

(RO)*, (R2)+ 
17$ 

R3.16S 
R1.R2 



:LOAD THE FPS. 



SET UP THE FP TRAP VECTOR IN CASE 
OF ERROR. 

COMPUTE THE ADDRESS OF FSRC. 



; TEST INSTRUCTION. 

;GET FPS. 
GET FEC. 
;SET FD MODE. 

;GET THE RESULT. 



; CHECK, THE RESULT. 



; BRANCH IF INCORRECT. 



:UAS FPS CORRECT' 

; BRANCH IF FPS IS INCORRECT. 

; RETURN, TEST COMPLETED. 

:UAS THE RESULT OVER OR UNDER r LOU' 
! BRANCH IF UNDERFLOW. 

; REPORT FPS BAD AFTER OVERFLOW. 



{REPORT FPS BAD AFTER UNDERFLOW. 



:SEE IF FAILURE IS ANTICIPATED 
; FAILURE. 



; BRANCH IF NOT ANTICIPATED. 

; ERROR WAS ANTICIPATFD SO RE'UPN 



10' 



-KIN0EC-11-DFFPB-A 
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T13 



UNDERvOVER FLOU, USING MULD UITH TRAP DISABLED. TEST 







ntP7np 


JUUU3~ 




ADD 


• •' at 


npppcc 


J1UCJ' 


nn 1 P">t 

UU1CJD 




MOV 


UL.07 
to t' 


UCCC'C 


nrm 1 1 p 
UUU1 IC 






TMp 

J IT 


UCQO 










TST 


4fclS 


OPPP74 
UCCC' t 




nnnn4f» 




uu 












4t8? 
~' uc 
























U7TM 


UCCjUU 


nn 1 nnp 

uu 1 U JC 






li "TIC 












t/ub 














napinp 
UCCJUC 


1 nu 1 x 




1 Rt- 
IDS. 


FRROR 


U7TXJ 

~' US 


UCCJUt 


UUU' tc 






RR 


U70Q 














UCC JUD 










471 1 


uccjuto 


1 D4 1 PC 
XUtlCD 






PRRDR 


471 P 


nap's m 
UCCJ1U 


UUUr tu 






RR 


147 1 "J 












47! 4 








• TP QN 


PP TROP 


471 C 
t^ is 


riPPTiP 

UCCJXC 


n 1 1 cop 

Ul 1DUC 




PC* • 

C33 . 


Mnv 

ny » 


47 It 
t/ ID 


ucc Jit 


npp7np 
UCC/ uc 


npp 1 *jn 

UCC I JU 




TMP 


4717 
tf if 


UCCJCU 


no 1 4np 
uuxtuc 






RPQ 


471 ft 


UCCJCC 


nrm 1 "57 


met 14 




TMP 


471 Q 












U7PO 
t/ CU 


npp*)pc 

UCCJCO 


UCCTDCo 




PC*- 
CBS. 


TMP 


4731 
~f £1 


UCCJJU 


ni np*37 

UlUCJr 


nni P"5t, 

JU1CJO 




nv » 


47PP 


UCCJJi 


i7npn*4 






5TPDS 

jiii j 


t/CJ 


UCCJJO 


1 7TT5nC 
If UJUT3 






3 13 1 


47PU 
t/ ct 




n t pttyi 

UlC' UU 


nnn?nn 

UUUCUU 




1 TV V 


4725 


022344 


170100 






LDFPS 


4726 


0223% 


012700 


022420 




MOV 


47 P7 


ftPP*lCP 

ucc jsc 


1 7un 1 n 
1 r tuiu 






c,Tn 

3 1 U 


47PQ 


UCC J3" 


nine 77 

U1U3J' 


nn< PC4 

UU*C3~ 




NOV 


47PQ 


UCCiJDU 


UCU301 


nnnn44 

UUUU~~ 




CMP 


47TO 
tf JU 


npp'x.4 
UCC Jot 


nntnnu 

UUlUUt 






RNP 
one 


47^1 
"f Jl 












477? 

• ' JC 


UCC JPO 


n 1 n 1 n? 






MOV 


JJ 
47>4 


UCCJf u 


nc,?7np 
use/ uc 


nnnncn 

UUUU3U 




onn 


~i ji 
4735 

J3 


UCCJIT 


nnni 1? 

UUUl IC 






JMP 


47% 

" ' JD 












14777 


UCCJ'D 


UUD/ CI 


nnnnpp. 

UUUUCD 


?7l- 
C' I< 


1 3 1 


U70a 

' f JO 












4739 












474(1 




nninm 








4741 












47M2 












4743 


022404 


104127 




28S: 


ERROR 


4744 


022406 


000161 


000056 




JMP 


4745 












47% 


022412 






59$: 




4747 


022412 


104130 




30S: 


ERROR 


4748 


022414 


000161 


000056 




JMP 


474 9 












•<7s: 


022420 


000000 


000000 


000000 0VDNTT: 


.U0RD 



•54.R2 
R2.S)l$TMP2 

(R2) 

46(R1) 



19$ 



125 
4$ 



126 
4$ 



(SP).R2 
12$, R2 
26$ 

atFPSPUR 

(SP)->.(SP) + 

R2,3t$TMP2 

R4 

R5 

1200, R0 
R0 

•0VDNTT.R0 

AC0.(R05 

R5,Si$TMPll 

R5.44CR1) 

27$ 

R1.R2 
•56. R2 

(R2) 
26CR1) 



29$ 



127 

56(R1) 



130 

56(R1) 
0,0,0,0 



;T0 THE ERROR REPORT IN THE Cfi. 
; ROUTINE. 



RESULT UPS NOT ANTICIPATED 
SO ERROR MUST BE REPORTED HERE. 
FIRST SEE IF ARGUMENTS SHOULD 
HAVE RESULTED IN OVERFLOW OR UN0EP 
FLOU BY LOOKING AT THE FLAG. 
BRANCH IF UNDERFLOW EXPECTED. 

REPORT RESULT INCORRECT, EXPECTING 
0VERFL0U. 

; REPORT RESULT INCORRECT, EXPECTING 
■UNDERFLOW. 



GET ADDRESS OF TRAP. 

UPS THE TRAP DURING THE MULF INSTRUCTION' 
BRANCH IF YES 

OTHERWISE GO REPORT A SPURIOUS 
FP TRAP. 

RESET THE STACK. 

SAVE DATA FOR ERROR REPORT. 

GET FPS. 

GET FEC. 

SET FD MODE. 

GET THE RESULT. 



;UAS THE FEC ANTICIPATED' 
; BRANCH IF NOT ANTICIPATED. 

; ERROR WAS ANTICIPATED SO 

: RETURN TO THE ERROR REPORT OF THE 

{CALLING ROUTINE. 



; THE ERROR WAS NOT ANTICIPATED SO _ _ 

IT MUST BE REPORTED HERE. FIRST SEE IF EXPECTED 
OVERFLOW OR UNDER FLOW. 

; BRANCH IF EXPECTING UNDERFLOW 

; REPORT TRAPPED ON OVERFLOW WITH FIV=0 



{REPORT TRAPPED ON UNDER FLOU UITH FIU=0 



JO' 



•fclNDEC-li- 



D^FPB-A 
21-N0V-: 



4751 C22426 XOOCC 

47sf 022430 

4754 022430 10*412 

4755 

4756 

4757 

4758 

4759 

4760 

4761 

4762 

4763 

4754 

4765 

4766 

4767 

4768 

4769 

4770 

4771 

4772 

4773 

47^4 

-775 322-432 333304 
"'HI 

4~B 02243M 
4779 Q2243M 1D4H13 
4^80 022436 004737 
->781 022442 320123 

4792 022*46 020200 

4793 022452 000123 
■«7B4 022456 177777 
^85 022462 3C2C00 
4796 022464 102004 
^797 022H6t> 000012 
-788 022470 177777 
*"89 022472 104145 
479C 022474 000401 
47<31 022476 104144 
4792 022500 

•^793 
4794 

4795 022500 
47% 022500 104413 
i"*97 02251)2 004737 
-♦798 022506 010127 
4799 022512 010200 
490C 022516 060127 
■4S01 022522 177777 
4802 022526 007017 
48C3 022530 107000 
4804 022532 000012 
4835 022534 177777 
^636 022536 134146 
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UNDERCOVER FLOW, USING 1ULD WITH TRAP DISABLED. TEST 



022660 
045676 
000000 
04567b 

177777 



022&60 
127272 
000000 
127272 
177777 



T T T 



DONE: 



RSET'je ;G0 INITIALIZE THE FPS ANO STACK; wNO 

SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER >AS 
THE USER TYPED CONTROL G»>. 



*************************************************************** 

*TEST 14 UNDERCOVER FLOW, USING PIULF WITH TRAPS ENABLED. TES T 

* 

♦ THIS IS A TEST OF THE UNDERFLOW AND OVERFLOW 

♦CONDITIONS THAT CAN OCCUR USING THE NULF INSTRUCTION. 

♦A SUBROUTINE IS CALLED TO SET UP THE OPERANDS, 

« EXECUTE THE HULF INSTRUCTION AND CHECK 

*THE RESULTS. HERE THE PARTICULAR INTERRUPT. 

♦EITHER OVERFLOW OR UNDERFLOW, IS ENABLED SO A TRAP SHOULD 

♦OCCUR. 

i 

•##♦»***#«******#*»*#♦*******«»«♦♦«*#*»«*#*«#**********#***##*♦* 

tSTlM: SCOPE 



: JNDERFLOW, EXPONENT OF RESULT = 

KKK1: 



II: 

2$: 
3S: 
41: 
51: 

65: 

75: 

85: 



LPERR 
JSR 
.UORO 
.WORD 
.WORD 
.WORD 
2000 
102004 
12 
-1 

ERROR 
BR 

ERROR 



PC.atOVUNFT 

20123.45676 
20200.0 
123,45675 
-I.-l 



145 

85 

144 



-129 

;SET UP THE LOOP ON ERROR ADDRESS. 

FSRC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

ST 331 (BUT FIU) NO TRAP. 



: UNDERFLOW. EXPONENT OF THE RESULT = -193 
KKK3: 





LPERR 




JSR 


IS: 


.WORD 


25: 


.WORD 


3$: 


.WORD 


45: 


.WORD 


55: 


7017 




107000 


65: 


12 




-1 


75: 


ERROR 



PC,a»OVUNFT 
10127, 127272 
10200 0 
60127. 127272 
-1,-1 



146 



;SET UP THE LOOP ON ERROR ADDRESS. 

AC 

FSRC 

RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 

;ST 137 (BUT FIJI NO TRAP. 



K07 
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4807 
4B09 
480S 
4810 
4811 
4812 
4813 

4814 

4815 

4eib 

4817 
4818 

481"? 

4820 
4821 
tB22 
4823 
4824 
4825 
4826 
4827 
4826 
482S 
48X 
4831 
4832 
4833 
4834 
4835 
4836 
4837 
4838 
4838 
4840 
4841 
4842 
4843 
4844 
4845 
48% 
4847 
4848 
4BM«3 
4850 
4851 
4852 
4853 
4854 
4855 

4ese 
4e57 

4858 
4B59 
48fc2 
■•St. 



C22S40 
022S42 
022S44 



022S44 
322544 
0225% 

022562 
022566 
022S72 
022574 
02257b 
022b00 
022602 
022604 
022606 
022610 



300401 
i>144 



104413 

004737 
060252 
060000 
000052 
17^777 
001000 
1C1006 
0OOC1C 
000000 
104147 
000401 
104143 



022bbC 

125252 
000000 
125252 
177777 



8$: 



BR 

ERROR 



85 

144 



lOVERFLOU, EXPONENT OF THE RESULT = 128 

KKK4: 



IS: 
2$: 
3S: 
4S: 
55: 

bS: 



8S: 



LPERR 
JSR 
.WORD 
.WORD 
.UORD 
.UORD 
1000 
10100b 
10 
0 

ERROR 
BR 

ERROR 



022blO 






KKK5: 


7 — 


022610 


104413 






LPERR 


022612 


004737 


022bb0 




JSR 


32261b 


060345 


067b54 


IS: 


.UORD 


022622 


060200 


000000 


2S: 


.WORD 


022626 


000345 


0b7b54 


3S: 


.WORD 


022632 


177777 


177777 


4$: 


.UORD 


022636 


007015 




5S: 


7015 


022640 


107002 






107002 


022642 


000010 




bS: 


10 


022644 


000000 






0 


02264b 


104150 




7S: 


ERROR 


022650 


000401 






BR 


022652 


104143 






ERROR 


022bS4 


000157 


000412 


8S: 


JMP 



:SET UP THE LOOP OH ERROR ADDRESS. 
AC 

FSRC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

ST 333 CBUT FIVi NO TRAP 



130 

:SET UP THE -OOP ON ERROR ADDRESS. 
AC 

FSRC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

150 ;ST 133 (BUT FIV) NO TRAP 

6S 
143 

KKKDONE 

THIS SUBROUTINE, OVUNFT. IS USED TO SET UP THE OPERANDS. EXECUTE 
THE NULF INSTRUCTION AND CHECK THE RESULTS OF AN INSTRUCTION WI T H 
OPERANDS WHICH SHOULD RESULT IN EITHER OVERFLOW OR UNDERFLOW. A CALL 
TO IT IS flAOE THUS: 

;AC OPERANO 
FSRC OPERANO 
; EXPECTED RESULT 
; ERROR RESULT 
FPS BEFORE EXECUTION 
;FPS AFTER EXECUTION 
; EXPECTED FEC 

;0'-l, OVER/UNDER FLOU FLAG 
;TRAP ERROR. 



PC.3I0VUNFT 

000052,125252 
-l.-l 



147 
8S 

143 



PC.3I0VUNFT 
50345, b7b54 
50200.0 
345,b7b54 

-l.-l 



ACARG: 


.WORD 


X,X 


FSRCARG: 


.WORD 


X,X 


RES: 


.WORD 


X,X 


ERRES: 


.WORD 


X.X 


FPSB: 


.WORO 


X 


FPSA: 
FEC: 


.WORD 


X 


.WORD 


X 


FLAG: 


.UORD 


X 


ERR1: 


ERROR 


X 


BR 


CONT 




ERR2: 


ERROR 


X 


CONT: 







: DATA . RESULT ERROR 
: RETURN ADDRESS 



LO' 



mmi:oe:-::-d«"pb-a pdp :: 
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4863 

4965 

4867 
4868 
4869 
4870 
4871 
4872 
4873 




41 
4884 
4885 
4886 
4887 
488P 
4889 
4890 
48*31 
4892 
4893 
4894 
4895 
4e% 
4897 
4898 
4899 
4900 
4901 
4902 
4903 
4904 
4905 
4906 
4907 
4908 
4909 
4910 
4911 
4912 
4913 
4914 
4915 
491b 
4917 
49ie 



022670 
022672 

022674 
022676 
022702 
022706 
022712 
02271b 
022722 
022730 

022736 
022742 
022744 
022752 

022760 
022762 

022766 
022770 



012601 
012700 
170100 

010100 
172410 

010102 
010237 
062702 
010237 
062702 
010237 
0lbl37 
012737 

OlblOO 
170100 
012737 
012737 

010100 
062700 

171010 
170000 



02277b 
023000 
023004 
023006 

023012 
023014 
02301b 
023020 



011b02 
020227 
001402 
000137 

022626 
170204 
170305 
012700 
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T14 JNDEFaOVER FLOW, USING MULF UITh TRAPS ENABLED. TES T 

THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR). THEN 
THE MULF INSTRUCTION IS EXECUTED. IF THE TRAP OCCURS THEN THE 
RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THE*. THE ^Pi 
CO-PARED WITH FPSP IF THIS TOO IS CORRECT OVUNFT RETjRNS CONTPDL 
TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD OVUNFT 
REPORTS THIS FAILURE AND THEN RETURNS TO CONT. THE FEC IS TPEA T ED 
IN THE SATE WAY. IF THE RESULT OF THE 

MULF IS INCORRECT. THE INCORRECT RESULT IS COMPARED WITH THE 
ANTICIPATED FAILING DATA PATTERN. ERRES. IF THE FAILURE IN 
THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN OVUNFT 
WILL TRANSFER CONTROL TO THE ERROR CALL AT ERR2 0 T HERWISE T HE 
RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED AND OVUNFT WIL. 
REPORT THE FAILURE AFTER WHICH CONTROL WILL BE PASSED TO CONT. 
IF NO TRAP OCCURS CONTROL IS PASSED TO ERR1. 
NOTE THAT OVUNFNT USES THE FLAG 

,T0 TELL WHETHER OR NOT THESE PARTICULAR OPERPNDS WILL RES'JL T IN 
UNDERFLOW (FLAG=-1) OR OVERFLOW (FLAG=0) . 



000200 



001240 
000004 
001242 
000004 
001244 

000022 001252 
023262 00124b 

000020 

0227bb 00123b 
02277b 000244 



000004 



OVUNFT: 



022772 000137 023222 



022770 
036614 

000200 



IS: 

2i: 



SOS: 



SIS: 



MOV (SPH.R1 

MOV l2G0.R0 

LDFPS RO 

MOV Rl.RO 

LDO (RO),ACO 

MOV R1,R2 

MOV R2,3tSTMP3 

AOO 14, R2 

MOV R2,3tSTMP4 

ADD t4,R2 

MOV R2.3ISTMP5 

MOV 22lRl),atSTMP10 

MOV tOVFTT,ai$TMP6 

MOV 2C(RD t R0 

LDFPS RO 

MOV tlS.atSTMP2 

MOV t50S,3tFPVECT 

MOV R1,R0 

ADO 14, RO 

MULF fR0),AC0 
CFCC 

JMP 3I2SS 

MOV (SP).R2 

CMP R2.I2S 

BEQ SIS 

JMP atFPSPUR 

CMP (SP)+,(SP)+ 

STFPS R4 

STST R5 

MOV 1200, RO 



:GET A POINTER T 0 T HE ARGUMENTS. 
;SET FD MODE. 



;LOAD ACO, OPERAND. 

;SAVE THE DATA PATTERNS IN CASE OF 
: ERROR. 



;LOAD THE FPS. 

;SET UP THE FP TRAP VECTOR IN CASE 
;0F ERROR. 

; COMPUTE THE ADDRESS OF FSRC. 

;TEST INSTRUCTION. SHOULD CAUSE TRAP. 

; FAILURE, NO TRAP. 

;TRAP TO HERE AND SEE IF THE PC OF THE 
; TRAP WAS THAT OF THE MULF INSTRUCTION. 
* BRANCH IF YES 

| OTHERWISE REPORT SPURIOUS FP ERROR. 

; RESET THE STACK 
;GET FPS. 

GET FEC. 

SET FD MODE. 



TAINDEC-1I-DFFPB-A 



Ql-N0V-7b 21:06 



M07 

POP II '34 FPP DIAGNOSTIC PART 2 NACY 11 27 (100b) 01-N0V-7b 21:12 PAGE 90 



TI4 



UNDER\OVER FLOU, USING flULF UITH TRAPS ENABLED. TEST 



4919 

4820 
4921 
4922 
4923 
4924 
492S 
492b 

4929 
4930 
4931 
4932 
4933 
493M 
4935 
493b 
4937 
4338 
4939 
4940 
4941 
49M2 
4943 
4944 
4945 
49% 
4947 
4948 
4949 
4950 
4951 
4952 
4953 
4954 
4955 
495b 
4957 
4958 
4959 
49b0 
49bl 
49b2 
49b3 
49b4 
4%5 
49bb 
49b7 
49b8 
49b9 
4970 
4971 
4972 
4973 
4974 



023024 
02302b 
023032 
023034 
023040 

023044 
023050 



0230b2 
0230b4 
0230bb 

023070 
023074 

02307b 
023102 
023104 



023110 
023114 



02311b 
023120 

023122 
023122 
023124 



02312b 
023132 



023134 
02313b 

023140 
023140 
023142 



023144 
023150 
023152 
02315b 
0231b2 
023 lb4 
0231bb 

023170 
023172 



170100 
012700 
174010 
010437 
010537 

012700 
010102 

022022 
001027 
077303 

025104 
001014 

02bl05 
001002 
OOOlbl 



005751 
001002 



104137 
000771 



104140 
0007b7 



0057bl 
001002 



104141 
000752 



104142 
0007b0 



012700 
010102 
052702 
012703 
022022 
001007 
077303 

010102 
0b2702 



0232b2 

001250 
001254 

0232b2 

000010 
000002 



000022 

000024 
00003b 

00002b 



00002b 



0232b2 

000014 
000002 



000034 



3$: 



4$: 

:REPORT 
SS: 



bS: 



LDFPS 

NOV 

STD 

NOV 

NOV 

NOV 
NOV 
AOO 
NOV 
CNP 
BNE 
SOB 

CNP 
BNE 

CNP 
BNE 
JNP 



RO 

•OVFTT.RO 
ACO. (RO) 
R4,filSTNP7 
R5,aHTHPll 

•OVFTT.RO 
R1.R2 
•10.R2 
•2.R3 

(ROH, (R2) + 

15$ 

R3.3S 

22(R1),R4 
10$ 

24(R1),R5 
5S 

3b(Rl) 



INCORRECT FEC. 
TST 2b (Rl) 



BNE 



7$ 



ERROR 137 
BR 4$ 



7S: 
BS: 



ERROR 
8R 



140 
4S 



: REPORT INCORRECT FPS. 
iOJ: TST 2b(RD 
BNE 12S 



11$: 



12S: 
13$: 



ERROR 141 
BR 4$ 



ERROR 
BR 



142 
45 



RESULT INCORRECT. 



lSS 



lbS: 



NOV 
NOV 
AOO 
NOV 
CNP 
BNE 
SOB 

NOV 
AOO 



•OVFTT.RO 
R1.R2 
•14.R2 
•2.R3 

(R6h,(R2) + 
17$ 

R3,lbS 

R1.R2 
•34, R2 



;GET THE RESULT . 



; CHECK THE RESULT. 



; BRANCH IF INCORRECT. 

;WAS FPS CORRECT' 

■ BRANCH IF FPS IS INCORRECT. 

; IS FEC CORRECT' 

;IF INCORRECT BRANCH. 

•.RETURN, TEST CCHPLETED. 

;UAS THE RESULT OVERFLOW OR UNDERFLOW 7 
; BRANCH IF UNDERFLOW. 

; REPORT BAO FEC ON EXPECTED OVERFLOW. 



; REPORT BAO FEC ON EXPECTED UNDERFLOW. 



;UAS THE RESULT OVER OR UNDER FLOW' 
; BRANCH IF UNDERFLOW. 

; REPORT FPS BAD AFTER OVERFLOW. 



; REPORT FPS BAD AFTER UNDERFLOW. 



;SEE IF FAILURE IS ANTICIPATED 
•FAILURE. 



; BRANCH IF NOT ANTICIPATED. 

; ERROR UAS ANTICIPATED SO RETURN 
;T0 THE ERROR REPORT IN THE CALLING 



1AIN0EC-11-DFFP8-A POP 11 

DFFPBfi. Pi 1 01-N0V-76 21 :Ob 
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4*375 


02317b 


010237 


00123b 


4976 


023202 


000112 




4977 








4979 


023204 


0057b 1 


00002b 


4979 
4980 








4981 








4982 








4983 


023210 


001002 




4984 








4985 








4986 


023212 


104143 




4987 


023214 


000733 




4988 








4989 


02321b 






4990 


02321b 


104144 




4991 


023220 


000731 




4992 








4993 








4994 


023222 


170204 




4995 


023224 


170305 




49% 


023226 


012700 


000200 


4997 


023232 


170100 




4998 


023234 


012700 


023262 


4999 


023240 


174010 




5000 


023242 


010437 


001250 


5001 


0232% 


010537 


001254 


5002 


023252 


010102 




5003 


023254 


062702 


000030 


5004 








5005 


023260 


000112 




5006 








5007 


023262 


000000 


000000 


5008 


023270 


000000 




5009 








5010 


023272 






5011 


023272 


104412 




5012 








5013 








5014 








5015 








501b 








5017 








5018 








5019 








5020 








5021 








5022 








5023 








5024 








5025 








5026 
5027 








5028 


023274 


000004 




5029 








5030 









T14 



175: 



UNDERCOVER FLOW, USING NULF WITH TRAPS ENABLED. TEST 



185: 



195: 
205: 



nov 

JMP 
TST 



BNE 



ERROR 
BR 



R2.3»STMP2 

(R2) 

26(R1) 



195 



143 
45 



ERROR 144 
BR 45 



; ROUTINE. 



RESULT WAS NOT ANTICIPATED 
SO ERROR MUST BE REPORTED HERE. 
FIRST SEE IF ARGUMENTS SHOULD 
HAVE RESULTED IN OVERFLOW OR UNDER 
FLOU BY LOOKING AT THE FLAG. 
BRANCH IF UNDERFLOW EXPECTED. 

REPORT RESULT INCORRECT, EXPECTING 
OVERFLOW. 



; REPORT RESULT INCORRECT, EXPECTING 
; UNDERFLOW. 



IF NO FP TRAP OCCURS COME HERE. 



255: 



STFPS 

STST 

MOV 

LDFPS 

MOV 

STD 

MOV 

MOV 

MOV 

ADD 

JMP 



R4 
R5 

•200 ,R0 
RO 

•OVFTT.RO 

ACO.(RO) 

R4,il$TMP7 

RS,atSTMPll 

Rl!R2 

•30, R2 

(R2) 



;G£T FPS. 

;GET FEC. 

•SET FD MODE. 

;GET THE RESULT. 



; ERROR WAS ANTICIPATED SO 

; RETURN TO THE ERROR REPORT OF THE 

; CALLING ROUTINE. 



OVFTT: .WORD 0,0,0,0 



KKKDONE : 



RSETUP ;G0 INITIALIZE THE FPS AND STACK; AND 

SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G'). 



iTEsT 15 UNDERCOVER FLOW, USING MULD WITH TRAPS ENABLED, TEST 

*THIS IS A TEST OF THE OVER FLOW AND UNDER FLOW CONDITIONS USING THE 
*MULD INSTRUCTION WITH TRAPS ENABLED. A SUBROUTINE IS USED TO SET UP 
#THE OPERANDS, EXECUTE THE MULD INSTRUCTION AND CHECK THE RESULTS. 

TSTIS: SCOPE 

UNDERFLOW, EXPONENT OF RESULT = -129 



B08 



•*inoe:-;:-df*-pb-a 

DFrpBfl.Pli oi-nov 
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5231 
5032 
5033 
5034 



5037 

5036 

5339 

SC40 

50M1 

5042 

50M3 

5044 

50% 

50% 

50M7 

5048 

5049 

5050 

5051 

5052 

5053 

5054 

5055 

5056 

5057 

5058 

5059 

SOW 

5061 

5062 

SOt> H 

5066 
5067 
5068 
506? 
5070 
5071 
5072 
5073 
5074 
5075 
5076 
5077 
5078 
S07S 
5060 
5081 
5082 
5083 
5084 
5085 
5086 



02: 
02: 
02: 
02: 

023310 
023314 
323322 
023324 
023332 
023334 
023340 
023344 
0233% 
023350 
023352 
023354 
023356 
023360 
023362 



023362 
023362 
023364 
023370 
023J74 
023400 
023406 
023410 
023414 
023420 
023426 
0234X 

8B« 

023436 
023440 
023442 
023444 
0234% 



0234% 
0234% 
023450 
023454 
023460 
Q23%4 
023472 
023474 
023502 
023504 
023510 
023514 
02351b 
023520 



104413 

004737 023622 

020052 1252S2 

125252 ir 

600000 
000177 177777 
177777 

000177 177777 
125252 125252 
002200 
102204 

0 00012 
177777 
104157 
000401 
104160 



000000 
177777 



104413 
004737 
010327 
036363 
010000 
000000 
060127 
036363 
1 77777 
177777 
007217 



023622 
127272 
045454 
000000 

127272 
045454 
177777 



000000 
177777 



U2 
177777 
104161 
000401 
104156 



lLI: 

IS 
2S 
3! 
4S 

ss 

bS 
7S 

81: 



LPERR 

JSR 

.UORO 

.UORO 

.UORO 



PC.atOVUNCT 
20052.125252 
125252.125252 
20300.0,0.0 



.UORO 17*. -1.-1,-1 



.UORO 

.UORO 

2200 

102204 

12 

-1 

ERROR 
BR 

ERROR 



177-1 

12S252.12S252 



1S7 
8S 

160 



SET JP 'HE LCOP ON ERPCP ADDRESS 
AC 

FSRC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FOS AFTER EXECU T ION. 
FEC 
FLAG 

ST 331 (BUT FIU< NO TRA°. 
ST 155 iBUT FD) 



: UNDERFLOW, EXPONENT OF THE RESULi = -193 
LLL2: 





LPERR 




JSR 


IS: 


.UORO 




.UORO 


2S: 


.UORO 


3S: 


.UORO 




.UORO 


4$: 


.UORO 


5S: 


7217 




1^7200 


6S: 






-1 


7S: 


ERROR 


BR 




ERROR 



9S: 



PC.aiOVUMOT 
10327,127272 
36363,45454 
10000,0,0.0 

60127, 127272 
36363, 45%4 
-1,-1.-1.-1 



156 



SET UP THE lOOP ON ERROR ADDRESS 
AC 

FSRC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS. AFTER EXECUTION. 
FEw 
FLAG 

ST 137 (BUT FIU) NC TRAP. 



104413 








LPERR 


004737 


023622 






JSR 


060252 


1252S2 




IS: 


.UORO 


125252 


125252 






.UORO 


160100 


000000 


000000 


2S: 


.UORO 


000000 










100177 


177777 


177777 


3S: 


.UORO 


177777 










100177 


177777 




4S: 


.UORO 




125252 






.UORO 


a5iioo 






SS: 


1200 


101216 








101216 


00X10 






6S: 


10 



jOVERFLOU, EXPONENT OF THE RESULT = 128 
LLl3 



PC.3tOVUNOT 
60252.125252 
12S2S2\ 125252 
1601X.0.0.0 



; SET UP THE LCOP ON ERROR A0DRES3 

;FSRC 
FSRC 



1X177,-1.-1,-1 ;RES 

; ERROR RES. 



1X177,-1 
125252,125252 



;FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 
;PEC 



C08 



•*!•€£:- li-£*TP8- A POP :i 

Orrpaa.pn Ol-NCV-rfe 21:06 
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soes 

183? 

5092 
50*3 
50*4 



5097 
5096 
5099 
5100 
5121 
51C2 
5103 
SlOM 
5105 
5106 
5107 
5106 
5109 
5110 
5111 
5112 
5113 
5114 
5115 
Slife 
5117 
5118 
511«3 
5120 
5121 
5122 
5123 
5124 
5125 
5126 
5127 
5126 
5129 
5130 
5131 
5132 
5133 
513M 
5135 
5136 
5137 
5138 
5139 
5140 
Si->; 
SH2 




023532 



023540 
023SMH 
023550 
023556 
023560 
023564 



022 
023600 
023602 
023604 
023606 
023610 
023612 
323614 
023616 



OOC401 
104163 



10441; 

004737 
060345 
056765 
060200 
000000 
000345 
0 56765 
1 77777 
177777 
007215 
107202 
OOOOIO 
003000 
104164 
000401 
104155 
000137 



0c2%22 
067154 
045€76 
OOOCJOC 

067654 
045676 

177777 



OOOOOC 



177777 



324234 



7$: 
SS: 



0 

ERROR 
BR 

ERROR 



162 
8S 

163 



:FLAG 

;ST 333 (BUT FIV, NC "RAP. 
;ST 700 (BUT FD-. 



: OVERFLOW. EXPONENT Of THE RESUL T = 130 
LlL4: 





lPERR 




JSR 


11: 


.WORD 




. WORD 


21: 


.WORD 


31: 


.WORD 




.WORD 


4$: 


• WORD 


5$: 


7215 




107202 


61: 


10 




0 


">$: 


ERROR 




BR 




ERROR 


8$: 


JNP 



PC.atOVUNDT 
60345,67654 
56765,45676 
60200,0.0.0 

345.67654 

56765.45676 

-1,-1,-1.-1 



164 

8$ 

155 

atLLLOONE 



SET UP THE LOOP ON ERROR ADDRESS. 
AC 
FSRC 
RES 

ERROR RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 
FLAG 

ST 133 (BUT FIV) NO TRAP 



THIS SUBROUTINE. OVUNDT, IS USED TO SET UP THE OPERANDS. EXECUTE 
THE NULO INSTRUCTION AND CHECK THE RESULTS OF AN INSTRUCTION WITH 
OPERANDS WHICH SHOULD RESULT IN EITHER OVERFLOW OR UNDERFLOW. A CAL- 
TO IT IS NADE THUS: 

AC OPERAND 
FSRC OPERAND 
EXPECTED RESULT 
ERROR RESULT 
FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
EXPECTED FEC 

0/-1, OVER/UNDER FLOW FLAG 
TRAP ERROR. 

jDATA, RESULT ERROR 
; RETURN ADDRESS 

THE OPERANDS ARE SET UP (USING ACO AS THE ACCUMULATOR ) . THEN 

THE NULD INSTRUCTION IS EXECUTED. IF THE TRAP OCCURS THEN TO _ _ 

RESULT IS CHECKED AGAINST RES. IF THE RESULT IS CORRECT THEN THE FPS IS 

COMPARED WITH FPSA IF THIS TOO IS CORRECT OVUNDT RETURNS CONTROL 

TO THE CALLING ROUTINE AT CONT. IF THE FPS IS BAD OVUNDT 

REPORTS THIS FAILURE ANO THEN RETURNS TO CONT. THE FEC IS TREATED 

IN THE SAME WAY IF THE RESULT OF THE 

MULF IS INCORRECT, THE INCORRECT RESULT IS COMPARED WITH THE 
ANTICIPATED FAILING DATA PATTERN. ERRES. IF THE FAILURE IN 
THE RESULT WAS ANTICIPATED CORRECTLY TO BE ERRES THEN OVUNDT 
WILL TRANSFER CONTROL TC THE ERROR CALL AT ERR2. OTHERWISE "HE 



ACARG: 


.WORD 


X,X,X,X 


FSRCARG 


.WORD 


X 9 X y X | X 


RES: 


.WORD 


X q X | X i X 


ERRES: 


.WORD 


X,X,X,X 


FPSB: 


.WORD 




FPSA: 


.WORD 


X 


FEC: 


.WORD 


X 


FLAG: 


.WORD 


X 


ERR I: 


ERROR 


X 


BR 


CONT 




ERR2: 


ERROR 


X 


CONT: 







•*:•€£;-:. -j"pb-m pdp 
:*«>8a. e i: ::-i:\-rfc 2i:0fc 

5:43 

514M 

5:45 
51% 
SIM7 
51% 
51 "9 

5150 023622 012601 

5151 323624 012700 CO02O0 

5152 023630 170100 
5153 

5154 023632 010100 

5155 023634 172410 
515b 

5157 023636 010102 

5158 023640 010237 

5159 023644 062702 
SlbO 023650 010237 
5161 023654 062702 
51b2 023660 010237 

5163 023664 016137 

5164 023672 012737 
5165 

5166 023700 016100 

5167 023704 170100 

5168 023706 012737 

5169 023714 012737 
S170 

5171 023722 01C100 

5172 023724 062700 
5173 

5174 023730 171010 

5175 023732 170000 
5176 
5177 
5178 

5179 023740 011602 

5180 023742 020227 023732 

5181 023746 001402 

5182 023750 000137 036614 
5183 

5184 023754 022626 

5185 0237*36 170204 

5186 023760 170305 

5187 023762 012700 000200 

5188 023766 170100 

5189 023770 012700 024224 

5190 023774 174010 

5191 023776 010437 001250 

5192 024002 010537 001254 
5193 

5194 024006 012700 024224 

5195 024012 010102 

51% 024014 062702 000020 

5197 024020 012703 000004 

519e 024024 022022 
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RESULT WAS INCORRECT BUT WAS NOT ANTICIPATED "NC C'.J^D T *Il^ 
REPORT THE FAILURE AFTER WHICH CONTROL WlL. BE PASSE: T 0 CON" 
IF NO TRAP OCCURS CONTROL IS PASSED TO ERR1. 
NOTE THAT OVUNONT USES THE FLAG 

TO TELL WHETHER OR NOT THESE PAR T ICULAR OPERANDS ^ RESJlT !*i 
UNDERFLOW <FLAG=-D OR OVERFLOW (FLAG=Q) . 



001240 
000010 
001242 
000010 
001244 
000042 
024224 

000040 

023730 
023740 



000010 



001252 
001246 



001236 
000244 



CVUNDT: NOV (SP)*.R1 

NOV •2O0.R0 

LDFPS RO 

MOV Rl.RO 

LOO (RO),AC0 

NOV R1.R2 

NOV R2.3ISTMP3 

ADO I10.R2 

NOV R2.3HTMP4 

ADD 110.R2 

NOV R2,3tSTHPS 

NOV 42lRl),aiSTHP10 

NOV •0VDTT,ai$TNP6 

NOV 40(R1),R0 

LDFPS RO 

NOV I1I.3HTHP2 

NOV i50i,atFPVECT 

NOV Rl.RO 

ADO llO.RO 



023734 000137 024164 



IS: 
2S: 



5CJ: 



515: 



;GET A POINTER TO THE APGJNETS. 
;SET FD MODE. 



;LOAD ACQ, OPERAND . 



;SAVF HE DATA PATTERNS IN CASE 
: ERROh . 



MULD (RO),AC0 
CFCC 

JNP at25S 

NOV (SP).R2 

CNP R2.I2S 

BEO 511 

JNP SiFPSPUR 

CNP (SP)+,(SP)+ 

STFPS R4 

STST R5 

NOV §200, RO 

LDFPS RO 

NOV IOVOTT.RO 

STD ACO.(RO) 

NOV R4,SrtTNP7 

NOV R5 atSTNPll 



NOV tOVDTT , RO 

NOV R1.R2 

ADD •20.R2 

MOV t4.R3 

35: CMP (ROJ+, (R2)+ 



;LOAO THE FPS. 



; SET UP THE FP TRAP VECTOR IN CASE 
;0F ERROR. 

; COMPUTE THE ADORE SS OF FSRC. 

;TEST INSTRUCTION. SHOULD CAUSE TRAP. 

; FAILURE, NO TRAP. 

;TRAP TO HERE AND SEE IF THE PC OF THE 
TRAP WAS THAT OF THE HULF INSTRUCTION. 
BRANCH IF YES. 

I OTHERWISE REPORT SPURIOUS FP ERROR. 

; RESET THE STACK 
GET FPS. 
;GET FEC. 
;SET FD NODE. 

;GET THE RESULT. 



: CHECK THE RESULT. 



mainoec-i;-dffpb-a pop :: 

DfrpBA.Pli Oi-HOV-rfc 21:C5 
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5199 G24028 

5200 Q2403C 
S201 



024054 



5205 3240% 
024044 
3240% 



^ll 

ffl5 
5215 
5217 
5218 
52 IS 
5220 
5221 
5222 
5223 
522M 
5225 

5227 



5230 
5231 
5232 

5235 
5236 
5237 
5238 
5239 
52H0 
S241 
5242 
5243 
5244 
5245 
52% 
5247 
5248 
5249 
5250 
5251 
5252 
£253 
525^ 



X1027 
077X3 

04 000C42 
1014 

025105 000044 
001002 

000151 000055 



000045 



10415: 

0OC771 



024054 


104152 




024055 


000757 




024070 


005751 


300045 


324074 


001302 




024075 


104153 




024100 


000752— 


024102 






024102 


104154 




024104 


000750 




024105 


012700 


024224 


024112 


010102 




024114 


052702 


000030 


024120 


012703 


000004 


024124 


022022 




024125 


001007 




024130 


077303 




324132 


010102 




024134 


052702 


000054 


024140 


010237 


001235 


024144 


000112 




0241% 


005751 


300045 


324152 


001002 





4S: 



3NE 
SOB 

CMP 
9fC 

CMP 



1SS 
R3.3S 

42iRl),P4 
10$ 



44(R1),R5 
5$ 

S5(R1> 



REPORT INCORRECT FEC. 



5$ 



5S: 



7S: 
81: 



TST 
BNE 



ERROR 



ERROR 
BR 



48(R1^ 



151 
4S 



152 
4S 



REPORT INCORRECT FPS. 



lbs 



11S: 



12$: 
13$: 



TST 
BNE 



ERROR 
BB 



46CR1) 
12$ 



153 



ERROR 
BR 



154 
4$ 



iS? 



15$: 



SULT INCORRECT 



17$: 



NOV 
NOV 
ADO 
NOV 
CHP 
BNE 
SOB 

NOV 
ADO 
MOV 
JNP 

TST 



BNE 



•OVOTT.RC 
R1.R2 
•30.R2 
■4.R3 

(R0H,(R2)* 
17$ 

R3,15$ 

RI.R2 

•54.R2 

R2.il$TNP2 

(R2) 

45CR11 



19$ 



; BRANCH IF INCORRECT 



;UAS FPS CORRECT' 

i BRANCH IF FPS IS INCORRECT 

:IS FEC CORRECT' 

;IF INCORRECT BRANCH. 

I RETURN, TEST COMPLETED. 

;UAS THE RESULT OVERFLOW OR UNCE«^:« 
; BRANCH IF UNDERFLOW. 

; REPORT BAD FEC ON EXPECTED OVEPFLOu. 



; REPORT BAD FEC ON EXPECTED UfCEPF^Ck 



;WAS THE RESULT OVER OR UNDER F-CV 
; BRANCH IF UNDERFLOW. 

; REPORT FPS BAD AFTER OVERFLOW. 



; REPORT FPS BAO AFTER" UNDERFLOW. 



;SEE IF FAILURE IS ANTICIPATED 
; FAILURE. 



; BRANCH IF NOT ANTICIPATED. 



ERROR WAS ANTICIPATED SO RETURN 
TO THE ERROR REPORT IN THE CALLING 
ROUTINE. 



RESULT WAS NOT ANTICIPATED 

SO ERROR MUST BE REPORTED HERE. 

HAvFr?SUL f ED^ t ^R^L0 5 W°b% 0 UNOEH 
FLOW BY LOOKING AT THE FLAG. 
BRANCH IF UNDERFLOW EXPECTED. 

REPORT RE5UL T INCORRECT. EXPECTING 



F08 



"ttircEC-K-o^PB-a pop :i 

20VW.Pi: C:-N3V-?fc 21:06 



34 FPP DIAGNOSTIC PART 2 PlflCYH 27C1006) 01-N0V-76 21:12 PAGE % 

T15 UNDERnOVER FLOW. USING NULD WITH TRAPS ENABLED. TEsT 



5255 
52% 
5257 
5258 

IH2 

52C>1 
5262 

R 

5265 



5269 
5269 
5270 
5271 
5272 
5273 
5274 
5275 
5276 
5277 
5278 
5279 
5280 
5281 
5282 
5283 
5284 
5285 
5286 
5287 
5288 
5288 
S28C 
5281 
5282 
5283 
5294 
5285 
5286 
5287 
5288 
5288 
5300 
5301 
5302 
5303 
5304 
5305 
5306 
5307 

E308 

53'~9 



C2s;s« 
024156 

024160 

8£i8 



♦164 
(166 
02S170 
024174 
024176 
02H202 
024204 

8§3§i! 

024216 



024224 
02S232 

024234 
024234 



Q24240 
024240 
024242 
02H2% 
024252 
024256 
02H262 
024266 
C2M272 
324276 



104155 
0C0733 



17C 

012700 
170100 
012700 
17M010 
010437 
010537 
010102 
062702 



02*4222 000112 



000000 

oooco: 



134412 



024236 000004 



104413 
004737 
000000 
000000 
000000 
000000 
177777 
177777 
000013 



18S: 



19S: 
201: 



ERROR 



155 
MI 



ERROR 156 
BR 4$ 



; OVERFLOW. 



; REPORT RESULT INCORREC*. EXPEri'.i 



IF NC FP TRAP OCCURS COME HERE. 



251 



000200 
024224 

001250 
001254 

000050 



STFPS 

STST 

flOV 

LDFPS 

MOV 

STO 

nov 
ncv 

NOV 
AOO 

JHP 



R4 
RS 
•200, RO 
RO 

•OVOTT.RO 

ACO.(RO) 

R4.3HTNP7 

RS.aiSTNPll 

R1.R2 

•50. R2 

(R2) 



; JNDERFLOW. 



ii? EE: 

;SET FD MODE. 
;GET THE RESULT. 



ERROR WAS ANTICIPATED 50 
RETURN TO THE ERROR REPORT ¥ 
CALLING ROUTINE. 



000000 000000 OVDTT: .WORO 0.0. CO 



LLwOONE: 



RSETUP ;G0 INITIALIZE THE FPS AND STACK; AN 

SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER :mh 
THE USER TYPED CONTROL G'«. 



*TEST 16 NOOF TEST 

*THIS IS A TEST OF THE NOOF INSTRUCTION. WHICH NAKES USE OF 

tA SUBROUTINE TO SET UP THE OPERANOS. EXECUTE THE NOOF INSTRUCTION 

♦AND CHECK THE RESULTS. 

t 

, •#*##***#########*##*####*§###*##§##**###*#####**##*#***###***§* 

TST16: SCOPE 



:NOOF WITH 
GGG1 



(FSRC=AC=0) 



025324 
000000 
000000 
000000 
000000 
Villi 
177777 





LPERR 




JSR 


IS 


.WORD 


2S 


.WORD 


3S 


.WORD 


4S 


.WORD 


5S 


.WORD 


61 


.WORD 


7S 


13 



PC.SINODFSUB 

o,6 

0,0 

0,0 
0,0 

-i.-l 
-l.-l 



;SET UP THE LOOP ON ERROR ADDRESS . 
AC 

FSRC 

FRACTIONAL RES. 
INTEGER RES. 
ERROR FRACTIONAL RES. 
ERROR INGETER PES. 
FPS BEFORE EXECUTION. 



•wircec-ii-D^pe-a 

DfcpBfl.Fll 31-NOV-Tb 21:06 



G08 

POP i: 24 FPP DIAGNOSTIC PART 2 NACY11 27,1006) 01-4CV-76 21:12 PAGE 97 



5311 
5312 
5313 

t?15 
5316 
531' 
S3ie 
5319 
532C 
5321 
532c 
5323 
5324 

£325 
5326 
5327 
5328 
5329 
53X 
5331 
5332 
5333 
5334 
5335 
5336 
5337 
5338 
5339 
53H0 
5241 
5342 
5343 
5244 
5345 
53% 
5347 
5348 
5349 

^ 

S3S5 
5356 
5357 
5358 
5359 
5360 
5361 
5362 
5363 
5364 
£365 
£366 



(324300 
024302 
024304 
♦306 
4310 



02431 C 
32M310 
024312 
024316 
024322 
024326 
024332 
024336 
024342 
024346 
024350 
024352 
Q243S4 
024356 
024360 



024430 
024430 
024432 
024436 
024442 
0244% 
024%2 
024456 
024462 
J24M66 
024470 
024472 
024474 
024476 
024500 



000004 
104056 
0004C1 
104057 



134413 
004737 
123456 
000000 
300000 
000000 
123456 
177777 
000000 
000004 
104056 
000401 
104057 



025324 
076543 
000000 
000000 
000000 
076543 
177777 



104413 
004737 
046252 
040300 
000000 
0%377 
046252 
040300 
000013 
000004 
104053 
000401 
104060 



025324 
125252 
000000 
000000 
177777 
125252 
000000 



T16 
3$: 

9S: 

:f100F 
&GG2: 



IS: 
2S: 
31: 
4$: 
5$: 
6S: 
7S: 

8$: 



HOOF TEST 



4 

ERROR 
BR 

ERROR 



56 
9$ 

57 



TEST, WITH (FSRC=0) 



9S: 



LPERR 

JSR 

.UORD 

.WORD 

.UORD 

.UORD 

.WORD 

.UORD 

0 

4 

ERROR 
BR 

ERROR 



PC.SIMODFSUB 

12^456,76543 

0.0 

0.0 

0.0 

123456,76543 
-1,-1 



56 
9S 

57 



: MODF TEST UITH (AC=0) 



324360 






&GG3: 




024360 


104413 






LPERR 


024362 


004737 


025324 




JSR 


024366 


000000 


000000 


IS: 


.UORD 


024372 


076543 


021234 


2S. 


.UORD 


024376 


000000 


000000 


3S: 


.UORD 


024402 


300000 


000000 


4S: 


.UORD 


024406 


000000 


000000 


51: 


.UORD 


024412 


177777 


177777 


bS: 


.UORD 


024416 


000003 




7S: 


3 


024420 
024422 


000004 






4 


104053 




8$: 


ERROR 


024424 


000401 






BR 


024426 


104057 






ERROR 


024430 






9$: 





pc.atnooFsue 

o □ 

76543,21234 

0.0 

0,0 

0,0 

-1,-1 



53 
9S 

57 



:FPS AFTER EXECUTION. 
; STORE SINGLE ZERO BAD. 

;AC V 1 <s ZERO faile:. 



;SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 

FRACTIONAL RES. 
INTEGER RESULT. 
ERROR FRACTIONAL RES. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
STORE ZERO FAILURE. 



;SET UP THE LOOP ON ERROR ADDRESS 
AC 

F5RC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

RES.8A0 



:MODF 
GGG4: 



IS 
2S 
3S 
4S 
5S 
6$ 
7$ 

8S 



9$: 



TEST UITH EXPONENT OF THE RESULT = 25 



LPERR 

JSR 

.UORD 

.UORD 

.UORD 

.UORD 

.UORD 

.UORD 

13 

4 

ERROR 
BR 

ERROR 



PC.aiPIODFSUB 
%^52, 125252 
40300.0 
0.0 

46377,-1 

46252,125252 

40300.0 



53 
9S 

60 



; SET UP THE LOOP ON ERRCR ADDRESS 
AC 

FSRC 

FRACTIONAL RES. 
INTEGER RES. 
ERROR FRACTIONAL RE5. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ST 134 



HQS 



TAI?CE:-ll-DfTP8-A 
DfrpBA.Pll Oi-NOV-76 



5367 
53b8 
5369 
5370 
5371 
5372 
5373 
5374 
5375 
5376 
5377 
5378 
5379 
5380 
5381 
5382 
5383 
5384 
5385 
5386 
5387 
5388 
5389 
5390 
5391 
5392 
S3S3 
53*34 
5395 
53% 
5397 
5398 
5399 
5400 
5401 
5402 
5403 
5404 
5405 
5406 
5407 
5408 
5409 
5410 
5411 
5412 
5413 
5414 
5415 
5416 
5-417 
5418 
5419 
5420 
£-•21 



024500 
024500 



024512 
024516 
024522 
024526 
024532 
024536 
024540 
024542 
024544 
0245% 
024550 



024550 
024550 
024552 
024556 
024562 
024566 
024572 
T24576 
024602 
024606 
02% 10 
02%12 

02% 14 
02%16 
024620 



024620 
024620 
024622 
024626 
02%32 
02%36 
02%42 
0246% 
024652 
024656 
024660 
024662 

024664 
024666 
02%70 



024670 



104413 

040300 
0000 00 

077777 

077652 
040300 
000000 
000004 
104053 
000401 
104060 



104413 
0C4737 
046200 
040340 
000000 
04^340 
040000 
177777 
000013 
000004 
104061 

000401 
1040L-1 



104413 
004737 
046000 
040340 
040100 
046140 
000000 
177777 
000000 
000000 
104062 

000401 
104054 



POP 11 
21:26 



025324 
125252 
000000 
000000 
177777 
125252 
000000 



34 FPP 



025324 
000001 
000000 
000000 
000001 
000000 
177777 



025324 
000001 
000000 
000000 
000001 
000000 
177777 



DIAGNCS' 
T16 



:NCDF 
SGGS: 



'IC PART 2 MACni 
HOOF TEST 



27il006< 01-N0V-76 



"HjL 



TEST UITH EXPONENT OF THE RESUL T = 127 



IS 
2S 
3S 
45 
5$ 
6S 
7$ 

8S: 



9S: 



LPERR 

JSR 

.UCRD 

.WORD 

.WORO 

.UORO 

.UORC 

.UORO 

0 

4 

ERROR 
8R 

ERROR 



pc.atnooFsuB 

77652,125252 

40300,0 

0.0 

77777,-1 

77652,125252 

40300.0 



53 
60 



;SET UP THE .OCF CN E»&:P fiK*ES5 
AC 

F5RC 

FRACTIONAL RES. 
INTEGER RES. 
ERROR FRACTIONAL RES. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



:flOOF TEST WITH 
&GG6 



EXPONENT OF RESULT = 25 



IS 
2S 
3J 
4J 
51 
6S 
7S 

8S 



9J: 



LPERR 

JSR 

.UORO 

.UOKO 

.UORO 

.UORO 

.UORO 

.UORO 

13 

4 

ERROR 
BR 

ERROR 



PC.atNODFSUB 
46200,1 
40340,0 
0,0 

46340,1 
40000.0 
-l.-l 



61 



9S 

54 



-.SET UP THE L00 e ON ERROR ADDRESS 
AC 

FSRC 

FRACTIONAL RES. 
INTEGER RES. 
ERROR FRACTIONAL RES. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
BAD CONSTANT l NOT 241, 
OR ST 525 TO 050 INTO 15C. 



iKODF 
&GG7: 



11 
2S 
3S 
4$ 
SS 
6S 
7S 



TEST UITH EXPONENT OF THE RESULT = 24 



BS 



9S: 



LPERR 

JSP 

.UORO 

.UORO 

.UORO 

.UORO 

.UORO 

.UORO 

0 

0 

ERROR 
BR 

ERROR 



PC^StPIOOFSUB 

46600, 1 

40340,0 

40100,0 

46140,1 

0.0 

-i.-l 



62 



9S 

54 



;SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 

FRACTIONAL RES. 
INTEGER RESULT. 
ERROR FRACTIONAL RES. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
BAD CONSTANT USED (NOT 24) 
OR ST 525 TO 150 INTO 050 



:MODF TEST UITH EXPONENT OF THE RESULT = 10 
GGG8: 



IDS 



PK Ci- 



5425 
5426 
5427 
5428 
5425 
5430 
5431 
5432 
5433 
5434 
5435 
54% 
5437 
5438 
5438 
5440 
5441 
5442 
5443 
5444 
5445 
5446 
5447 
5448 
5449 
545C 
5451 
5452 
5453 
5454 
5455 
5456 
5457 
5458 
S l -59 
5460 
5461 
5462 
5463 
5464 
5465 
5466 
5467 
5468 
5469 
5470 
5471 
5472 
5473 
5474 
5475 
5476 
5477 
547e 



i?C 
>7Z 
024676 
024702 
0247O6 
024712 
024716 
024722 
024726 
024730 
024732 
024734 
024736 
024740 



024740 
024740 
024742 

024746 
024752 
024756 
024762 
024766 
024772 
024776 
025000 
025002 
025004 
025006 
025010 



025010 
025010 
025012 
025016 
025022 
025026 
025032 
025036 
025042 
025046 
025050 
025052 
02SOS4 
025056 
025060 



025060 
025060 
025062 
025066 
025072 
025076 



NOV-'* 

042577 
0*40200 
040177 
042577 
177777 
177777 
000000 
000000 
104053 
000401 
104054 



104413 
004737 
042577 
040200 
034600 
042577 
000000 
177777 
000000 
000000 
10*063 
000401 
104054 



104413 
004737 
042377 
040200 
000000 
042377 
177777 
177777 
000013 
000004 
104053 
000401 
104054 



104413 
004737 
040177 
040200 
040177 



pop :: 

21: Ob 



025324 
177777 
OOOOCC 
17600C 
140000 
17-777 
177777 



34 FPP DIAGN3ST 
Tib 



025324 
140001 
000000 
000000 
140000 
000000 
VT771 



025324 
100000 
000000 
000000 
100000 
177777 
177777 



PAPT 2 MAC t'll 
MODF TEST 



27t IDOfc, j 0i-N0V-7b 21: 12 PniE Y: 



IS 
21 
35 
4$ 
5$ 
bS 
7S 

85 



9$: 



LPERR 

JSR 

.WORD 

.UORD 

.WORD 

.UORD 

.WORD 

.UORD 

0 

0 

ERROR 
BR 

ERROR 



PC.3IM0DFSU8 

42577,-1 

40200, C 

40177.176000 

42577.140000 

-l.-l 

-l.-l 



53 
9$ 

54 



:M0DF 
GGG9: 



IS 
21 
3S 
4S 
5S 
6S 
7S 

BS 



9S: 

:MODF 
GGG10 



IS: 
2S: 
3S: 
41: 
5S: 
6S: 
7S: 

8S: 



9$: 



TEST UITH THE EXPONENT OF 



LPERR 

JSR 

.UORD 

.UORD 

.UORD 

.UORD 

.UORD 

.UORD 

0 

0 

ERROR 
BR 

ERROR 



PC^atflODFSUB 

42577,140001 

40200.0 

34600,0 

42577,140000 

0,0 

-l.-i 



63 
9S 

54 



SET UP THE LCOF C'< i^ZP X,Z*l 
AC 

FSRC 

FRACTIONAL RES. 
INTEGER RES. 
ERROR FRACTIONAL RES. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



THE RESULT = 10 

SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

ST 532 TO 122 INTO NORMALIZE. 



TEST H1TH EXPONENT OF THE RESULT r 9 



LPERR 

JSR 

.WORD 

.UORD 

.UORD 

.UORD 

.UORD 

.UORD 

13 

4 

ERROR 
BR 

ERROR 



pc.atnooFsuB 

42377,100000 
40200 0 
0.0 

4*377, 100000 

-l.-l 
-1,-1 



53 
9$ 
54 



SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 

FRACTIONAL RES. 
INTEGER RES. 
ERROR FRACTIONAL RES. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



025324 
177777 
000000 
177777 



:M0DF TEST UITH EXPONENT OF THE RESULT =• 0 
&GG11: 

LPERR 

JSR PC.StMODFSUB 



;SET UP THE LOOP ON ERROR ADORESS. 



IS 
2S 
3S 



.UORD 
.UORD 
.UORD 



40l77,-l 
40200,0 
40177,-1 



;AC 
;FSRC 

FRACTIONAL RES. 



JDS 



•tt!»CEC-li-DFFPB-fl 
DFFPBh.PII 01 -NOV 



POP 11 3 1 * FPP DIAGNOSTIC PART 2 1ACY11 27tl00fc. 
•76 21: Ob Tib MODF TEST 



5479 
5M90 
5481 

IS 

5484 
5485 
5486 
5487 
5488 
5489 
5490 
5491 
54<32 
5493 
5494 
5495 
54% 
5497 
5418 
5499 
5500 
5501 
5502 
5502 
5504 
5505 
550b 
5507 
5508 
5509 
5510 
5511 
5512 
5513 
5514 
5515 
5£lb 
5517 

ssie 

5519 
5520 
5521 
5522 
5523 
5524 
5525 
552b 
5527 
5528 
5529 
5530 
5531 
5532 
5533 



02S112 

025122 
025124 
02512b 
025130 



025130 
025130 
025132 
02513b 
025142 
0251% 
025152 
02515b 
0251b2 
C25lbb 
025170 
025172 
02S174 
02517b 
025200 



025200 
025200 
025202 
02520b 
025212 
02521b 
02S222 
02522b 
025232 
02523b 
025240 
025242 
025244 
02524b 
025250 



025250 
025250 
025252 
02525b 
0252b2 
0252bb 
025272 
02527b 
025302 
02530b 
025310 



104413 
004737 
034377 
040200 
034377 
000000 
000000 
034377 
000000 
000000 
1040b4 
000401 
104054 



10441? 
004737 
020000 
040300 
020100 
000000 
020100 
000000 
000000 
000000 
1040b5 
000401 
104054 



104413 
004737 
142777 
040200 
140000 
142777 
040000 
042777 
000007 
0000 1C 



040177 177777 

88880O 
1040b4 
000401 
1040S4 



025324 
177777 
000000 
177777 
000000 
000000 
177777 



025324 
000001 
000000 
000002 
000000 
000001 
000000 



025324 
170000 
000000 
JOOOOO 
lbOOOO 
000000 
lbOOOO 



III 

bS: 
71: 

8$: 



9$: 



.UORQ 

.UORD 

.WORD 

17 

0 

ERROR 
BR 

ERROR 



40177, -1 



b4 
9$ 

b4 
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INTEGER RES. 
ERROR FRACTIONAL RE5. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ST 041 TC 045 IN T 0 24fc. 



:MODF 
GGG12 



IS 
2S 
3S 
4$ 
SS 
bS 
7$ 

BS 



9S: 



TEST UITH EXPONENT OF THE RESULT = -15 



LPERR 

JSR 

.UORD 

.UORD 

.UORO 

.UORD 

.UORD 

.WORD 

0 

0 

ERROR 
BR 

ERROR 



PC.a»nooFsuB 

34377,-1 

40200,0 

34377,-1 

0,0 

0,0 

34377,-1 



54 
9$ 

54 



;SET UP THE LOOP ON FPRC? fiDCPE: 
AC 

FSRC 

FRACTIONAL RES. 
INTEGER RES. 
ERROR FRACTIONAL RES. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



:10DF TEST WITH 
GGG13: 

LPERR 
JSR 
.UORD 
.UORO 
.UORD 
.UORD 
.UORD 
.UORO 
0 
0 

ERROR 
BR 

ERROR 



EXPONENT OF RESULT = -54. IN ROUND NODE 



IS 
2S 
3S 
4S 
5S 
bS 
7S 

es 



PC.3IM0DFSUB 

20600, 1 

40300,0 
20100,2 
0.0 

26100,1 

0.0 



b5 
9S 

54 



;SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

ROUND TRUNK, ST 12b INTO ROUND. 



1 ST UITH EXPONENT OF RESULT = 11 

;SET UP THE LOOP ON ERROR ADDRESS 



9S: 




:NOOF 


• 1 ST UITH 


GGG14: 






LPERR 




JSR 


IS: 


.UORD 


2S: 


.UORD 


35: 


.UORD 


4S: 


.UORO 


5$: 


.UORD 


bS: 


.UORD 


7S: 


7 




10 



pc.a»ricoFsuB 

142777.170000 

40200.6 

140006, 0 

142777.150000 

40000,6 

42777,150000 



AC 

F C RC 

FRACTIONAL RES. 
INTEGER RES. 
ERROR FRACTIONAL RES. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



■^inde;-::-o«"pb-a 



5535 
55% 
5537 
5538 
553S 
5540 
5541 
554c 
55*3 
55 u 4 
5545 
5546 
5547 
5543 
=549 
5550 
5551 
5552 
5553 
5554 
5555 
5556 
5557 
5558 
555? 
55fa0 
55b 1 
5562 
S563 
55b4 
5565 
SSbb 
55b7 

5568 
S5b<3 
557C 
5571 
5572 
5573 
5574 
5575 
557b 
5577 
5578 
5579 
5580 
|581 

§584 
5585 
558b 
55e7 
5588 
558S 
SS9C 



225312 I340bb 

02531 J 300401 

02531b 1043fe7 

02S32C 300167 



0C:3bfe 



34 FPP CIAGNCS' 
Tib 

95: 



9S: 



K08 

: PAfl T 2 NACY11 27ilD0b) 
MODF TEST 

ERROR bb 

BR <3S 

ERROR b7 

JMP GGGDONE 
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:SIGN OF FRACTION. 

;SIGN OF INTEGER. 
;G0 TO NEXT TEST. 



THIS SUBROUTINE. NODFSUB. IS CALLED TO SETUP THE 

OPERANDS. EXECUTE THE MODF INSTRUCTION AND CHECK THE RESULTS. 

IT IS CALLED THUS: 



ACARG: 
FSRCARG 
FRES: 
INTRES: 
ERF RES 



.UORD 
.WORD 
.WORD 
.UORD 
.UORD 



ERINTRES: .WORD 



FPSB: 
FPSA: 
ERR1: 

ERR2: 
CONT: 



.UORD 
.UORD 
ERROR 
BR 

ERROR 



X,X 
X.X 
X,X 

x,x 
x,x 

X.X 
X 
X 
X 

CONT 

X 



AC OPERAND 
FSRC OPERAND 
FRACTIONAL RESULT 
INTEGER RESULT 
ERROR FRACTION RESULT 
ERROR INTEGER RESULT 
FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
FRACTION ERROR 

; INTEGER ERROR 
; RETURN ADDRESS 



THE OPERANDS ARE SET UP 
INSTRUCTION IS EXECUTED. 
THE FPACTION PART OF THE 
THEN THE INTEGER PART IS 
THEN THE FPS 13 COMPARED 
THEN NOOFSUB UILL RETURN 
IT IS REPORTED HERE. IF 



(USING ACO FOR THE AC ARGUMENT). T HE MODF 
THEN THE RESULTS ARE RETRIEVED. 
RESULT I? COMPARED UITH FRES. IF THIS IS CORRECT 
COMPARED UITH INTRES. IF BOTH OF THESE ARE CORRECT 
UITH FPSA. AFTER EXECUTION IF NO ERRORS OCCURRED 
TO CONT. IF THE FPS WAS INCORRECT 

THE FRACTION IS INCORRECT IT IS COMPARED UITn 



THE ANTICIPATED BAD FRACTION. ERFRES. IF THIS DOESN'T MATCH 
THE TRUE RESULT THEN THE ERROR IS REPORTED HERE. IF THE ANTICIPATED 
FAILURE MATCHES THE TRUE RESULT THEN MOOFSUB PASSES CONTROL TO THE 
ERROR CALL AT ERR1. LIKEUISE IF THE INTEGER PART CfTI* RESULT IS 
NOT CORRECT THEN IT IS COMPARED UITH THE ANTICIPATED INTEGER 
FAILURE. IF THIS DOEN'T MATCH THEN THE ERROR IS REPORTED HERE. 
IF A MATCH IS MADE HOUEVER, MOOFSUB UILL RETURN CONTROL TO THE ERROR 
CALL AT ERR2. 



025324 


012601 




MOOFSUB: 


02532b 


012700 


000200 


MOV 


025332 


170100 




LDFPS 


02533M 


010100 




MOV 


02533b 


172M10 




LDD 


025340 


012700 


025702 


MOV 


025344 


172510 




LDD 


0253% 


OlblOO 


000030 


MOV 




170100 




LDFPS 




012737 


025370 001236 


MOV 


025362 


010100 




MOV 


025364 


062700 


000004 


ADD 


025370 


171410 




1$: MODF 


025372 


170204 




STFPS 


025374 


012700 


000200 


MOV 



MOV iSPH.Rl 
•200, RO 
RO 

Rl.RO 
(RO).ACO 
•MOOP1.R0 
(RO).ACl 
30(Rl),R0 
RO 

•1S.3ISTMP2 

Rl.ftO 
•4,R0 

(RO),ACO 

R4 

•200.R0 



:GET A POINTER TO THE ARGUMENTS 
SET FD MODE. 

SET UP ACO 

PUT A BACKROUND PATTERN INTO AC1. 
SET UP THE FPS. 

; COMPUTE THE ADDRESS OF THE FSRC. 

;EXECUTE THE TEST INSTRUCTION. 

;GET THE FPS. 
:SET FD MODE. 



TfllrCEC-ll-DFPPB-fl pop :: 
DffPBfl.Pi: Ol-NCv-76 21:26 



L08 

34 FPP DIAGNOSTIC PART 2 MACY11 27(1006) 
Tib MODF TEST 



5545 


£325402 


170100 
012700 


025662 




5593 


025406 


l'NOlO 






559M 


02S410 


0127X 


025672 




5595 


D2S414 


174110 






55% 










SS97 


025416 


010102 






5596 


025420 


010237 


001240 




5599 


025424 


062702 


000004 




5600 


02S430 


010237 


001242 




5601 


02S434 


062702 


000004 




56U2 


025440 


010237 


001244 




56C3 


02S444 


062702 


000004 




5604 


025450 


010237 


001246 




5605 


02S454 


012737 


025662 


001250 
001252 


5606 


025462 


012737 


025672 


5607 


025470 


010437 


001254 




5608 


025474 


016137 


000032 


001256 


5609 










5610 


025502 


012702 


025662 




5611 


025506 


026112 


000010 




5612 


025512 


00102? 






5613 


025514 


026162 


000012 


000002 


5614 


02S522 


001016 






5615 










5616 


025524 


012702 


025672 




5617 


025530 


026112 


000014 




5618 


025534 


001026 






5619 


025536 


026162 


000016 


300002 


5620 


025544 


001022 






5621 










5622 


025546 


026104 


000032 




5623 


02S552 


001034 






5624 










5625 


025554 


000161 


000042 




5626 










5627 










S628 


025560 


! 26112 


000020 




5629 


02S564 


C 01010 






5630 


025566 


f 26162 


000022 


000002 


5631 


025574 


01 004 






5632 


025576 


010102 






5633 


025600 


062702 


000034 




5634 










5635 


025604 


000112 






5636 










5637 


025606 








cc. oo 
bo Jo 


UcbbUb 


104053 






5639 


025610 


000761 






5640 










5641 










5642 


025612 


026112 


000024 




5643 


025616 


001010 




5644 


025620 


026162 


000026 


000002 


5645 


025626 


001004 






5646 


025630 


010102 







9$: 



LDFPS 

MOV 

STD 

flOV 

STD 

MOV 
MOV 
ADD 
MOV 
ADD 
MOV 
ADD 
MOV 
MOV 
MOV 
MOV 
MOV 

MOV 
CMP 
BNE 
CMP 
BNE 

MOV 
CMP 
BNE 
CMP 
BNE 

CMP 
BNE 

JMP 



RO 

•MODF TO, RO 
ACO. (R05 
•MODFTl.RO 

flCl,(RO) 

R1.R2 

R2.3ISTMP3 
•4.R2 

R2,3»$TMP4 
•4,R2 

R2.3HTMPS 
•4.R2 

R2.3IITMP6 

•N6DFT0,3iSTMP7 

iMODFTl'atSTMPlO 

R4,3fITrlPn 

32tRl),3»$TMPl2 

•M0DFT0.R2 
10(R1),CR2) 
10S 

12(R1),2(R2) 
10S 

•H0DFT1.R2 
14(R1),(R2) 
15S 

16(R1),2(R2) 
15S 

32(R1),R4 
20$ 
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;GET THE FRACTIONAL RESJL T . 
;GET THE INTEGER RESULT. 

;SAVE THE DATA IN CASE OF ERROR. 



; CHECK THE FRACTIONAL RESULT. 
; BRANCH IF INCORRECT. 

; CHECK THE INTEGER RESULT. 
; BRANCH IF INCORRECT. 



; CHECK THE FPS. 

; BRANCH IF INCORRECT. 



42(R1) 



FRACTIONAL ERROR. 



lOI: 



11$: 
12$: 



CMP 
BNE 
CMP 
BNE 
MOV 
ADD 

JMP 



ERROR 
BR 



: INTEGER ERROR. 
iS$: CMP 

BNE 

CMP 

BNE 

MOV 



20(R1).(R2) 
11$ 

22(R1),2(R2) 
11$ 
R1.R2 
•34, R2 

(F2) 



53 
9$ 



24(R1),(R2) 
16$ 

26(R1),2(R2) 

16$ 

R1.R2 



; RETURN. 



;WAS THE ERROR ANTICIPATED" 
; BRANCH IF N0 T ANTICIPATED. 



;THE ERROR MAS ANTICIPATED SO 

; RETURN TO THE ERROR REPORT A T THE 

{CALLING ROUTINE. 

; THE ERROR UAS NOT ANTICIPATED SO 
j REPORT THE INCORRECT FRACTION HERE. 



;UAS THIS ERROR ANTICIPATED' 
J BRANCH IF NOT. 



;THE ERROR WAS ANTICIAPTED SO RETUTN 



M08 



ThINDEC-11-DFFPB-A POP 11 

OrrpBft.PH 01-N0V-7E) 2i:Cfe 



34 FPP DIAGNOSTIC PART 2 NACY11 27(100b) 01-N0V-7b 21:12 PAGE 123 
Tib MODF TEST 



5647 
5648 
5649 
S650 

33 

5653 
S6S4 
5655 
565b 
5b57 
5b58 
5659 
5660 
Sbbl 
5662 
5bfc3 
5664 
5bb5 
5bbb 
5bb7 
5668 
5669 
5b70 
5b7l 
5b72 
5b73 
S674 
5b75 
5b7b 
5b77 
5b76 
S679 
5b60 
5bfll 
5b82 
5b83 
5b8M 
5b8S 
5686 
5bfl7 
5b88 
5689 
5690 
S691 
5692 
5693 
5694 
5695 
5b% 
5697 
5b% 
5699 
570C 
5701 
5702 



G2S632 
025b3b 

025642 



025644 
02Sb50 
025656 
02SbbO 

025662 
02Sb70 

02Sb72 
025700 

025702 
025710 

025712 
025712 



0b2702 000040 
000112 



104054 
000744 



02571b 
02571b 
025720 
025724 
025732 
02573H 
C25742 
025744 
025752 
025754 
0257b2 
0257b4 



010437 
01bl37 
104055 
000735 

00X00 
000000 

000000 
000000 

1 77777 
177777 



104412 



025714 000004 



104413 
004737 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
000000 



001254 
000032 



000000 
000000 
177777 



027422 
00X00 

XOOX 

XXX 

XOOX 

oooxo 



ADO 
JMP 



«40,R2 

(R2) 



m 



ERROR 54 
BR SS 



:FPS INCORRECT. 

20$: MOV R4.3HTMP11 

00125b MOV 32tRl),3l$TMP12 

21S: ERROR 55 

BR 9$ 

XOXO MODF TO: .UORD 0,0,0,0 



000000 M00FT1: .UORD 0,0,0,0 



177777 M0DP1: .UORO -1,-1,-1,-1 



;T0 THE ERROR REPORT IN THE CABLING 
•ROUTINE. 



; THE ERROR UAS NOT ANTICIPATED 30 PERuF* 
•THE INTEGER FAILURE HERE. 

; REPORT INCORRECT FPS. 



GGGDONE : 



RSETUP ;G0 INITIALIZE THE FPS AND STACK; AND 

SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G'). 



4 TEST 17 MOOT TEST 

*THIS IS A TEST OF THE MOOT INSTRUCTION. IT HAKES USE Of A SUBROUTINE 
*T0 SET UP THE ARGUMENTS, EXECUTE THE INSTRUCTION AND CHECK THE 
*RESULTS. 
ft 

•*#»»»***#«###«##««*##**♦»#**#*»*»*««»«»*********************«* 
TST17: SCOPE 



XOOOO 
00X00 
000X0 
XOXO 
000000 



:MOX WITH (FSRC=AC=0) 
HHH1: 

LPERR 
JSR 
.WORD 



IS 
2S 
3S 
4$ 
5$ 



PC.3IM0DDSUB 

o,6,o,o 



.UORD 
.WORD 
.UORD 
.UORD 



0,0,0,0 
0,0,0,0 
0,0,0,0 

o,o,o,o 



SET UP THE LOOP ON ERROR AXRESS. 
AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 



ThINOEC-11-DFFPB-A 
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N08 

1ACY11 27 (100b) 



UFFPSfl.Pll 



Cl-N0V-7b 21: Ob 



5703 


Q257/' 3 


QQQQQQ 




5704 
570S 


025774 


000000 


000000 


026002 


177777 


570b 


026004 


000200 




5707 


026006 


000204 




5708 


026010 


104070 




5709 


026012 


000401 




5710 


026014 


104074 




5711 


02601b 






5712 








5713 








5714 


02601b 






5715 


02601b 


104413 




571b 


026020 


004737 


027422 


5717 


026024 


012345 


067012 


5719 


026030 


034567 


012345 


5719 


026034 


000000 


000000 


5720 


026042 


000000 




5721 


026044 


000000 


000000 


5722 


026052 


000000 




5723 


026054 


000000 


000000 


5724 


026062 


000000 




572S 


026064 


012345 


067012 


572b 


026070 


034567 


012345 


5727 


026074 


177777 


177777 


5728 


026102 


177777 




5729 


026104 


000213 




5730 


026106 


000204 




5731 


026110 


104075 




5732 


026112 


000401 




5733 


026114 


104076 




573M 


02611b 






573S 








573fc 








5737 


02b lib 






5738 


02611b 


104413 




5739 


026120 


004737 


027422 


5740 


02b 124 


000000 


000000 


574! 


02b 132 


000000 




57"2 


02b 134 


072727 


127272 


5743 


02bl40 


072727 


127272 


5~44 


02b 144 


000000 


000000 


5/45 


026152 


000000 




574b 


026154 


000000 


000000 


5747 


02blb2 


000000 
177777 




5748 


026164 


177777 


5749 


026172 


177777 




5750 


026174 


177777 


177777 


5751 


026202 


177777 




S752 




nrjn?1 T 




5753 








5754 


026210 


104070 




5755 


026212 


000401 




575b 


026214 


104071 




5757 


02621b 






57Se 









177777 



000000 
000000 
000000 

177777 



000000 

000000 
000000 
177777 
177777 



T17 

bS 

7$ 
85 

9$: 

; MOOD 
HHH2: 



IS 
2S 
3S 
4$ 
5S 
6S 
7S 
BS 

9S: 



jflODD 
HHH3: 



IS 
2S 
3S 
4S 
55 
6S 
7S 
85 

9S: 



MOOD TEST 



.WORD 0,0,-1,-1 



200 
204 
ERROR 
BR 

ERROR 



70 
9S 

74 



TEST WITH FSRC=0 



LPERR 

JSR 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 
.WORD 
.WORD 

213 
204 
ERROR 
BR 

ERROR 



PC.3HM0DDSUB 
012345.67012 
345b7, 012345 
0,0,0,0 

0,0,0,0 

0,0,0,0 

012345.67012 
345b7, 012345 
-1.-1,-1,-1 



75 
9S 
7b 



TEST WITH (AC=0) 



LPERR 

JSR 

.WORD 

.WORD 
.WORD 
.WORD 

.WORD 

.WORD 

.WORD 

213 
204 
ERROR 
BR 

ERROR 



PC.3IH0DDSUB 
0,6,0,0 

72727,127272 
72727 127272 
0,0,0,0 

0,0,0,0 

-1,-1,-1,-1 

-1,-1,-1,-1 



70 
95 

71 
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; ERROR INTEGER RES. 

;FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 

;ST 231 TO 142 INTO 143 



SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
STORE DOUBLE ZERO 

AC V 1 <= ZERO ST 143 



SET UP THE LOOP ON ERROR ADDRESS 
AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



B09 



■*:*ce:-i:-or*PB-H pop :: 
^pobh.pii q:-n:\--6 z:-.zb 



2* cep CIA5NCS' 
T17 



'i: p AR T 2 TAC^ll 27d00fe, 01-N0V-7b 21:12 PAGE 125 
riOX TST 



5~S9 

5760 

5761 

S7b2 

5763 

5764 

5765 

5766 

5767 

5768 

5769 

S77C 

5771 

5772 

5773 

5774 

5775 

5776 

5777 

5779 

5779 

5780 

5781 

5782 

5783 

578M 

5785 

57% 

5787 

5788 

5789 

5790 

57*31 

5792 

5733 

5794 

57% 

57% 

5737 

57% 

5793 

5800 

5801 

5802 

5803 

5804 

5305 

580b 

5807 

5808 

5809 

5810 

5811 

5ei2 



02521b 
026216 
026220 
026224 
026230 
32623M 
0262S2 
326244 
0262S2 
026254 



026270 
026274 

026302 
026304 

0 26 306 
026310 
026312 
026314 
02631b 



02631b 
02631b 
026320 
02632M 
026332 
026334 
026340 
026344 
026352 
026354 



026372 
026374 
026400 
026404 
026406 
026410 
026412 
026414 
02641b 



02641b 
02641b 
026420 
026424 
C26432 
026434 
026442 
026444 
326452 



104413 
00M737 
056252 
125252 
040300 
000000 
000000 
000000 
056377 
177774 
000000 
125252 
0 56377 
177777 
000213 
000204 
104077 
000401 
104077 



104413 
004737 
140240 
000000 
0 63714 
133572 

oooooc 

163777 

1 62531 
1 77777 
177777 
063777 
162531 
000210 
000204 
104070 
000401 
104100 



104413 
004737 
056200 
000001 
040340 
000000 
000000 
000000 



027422 
12S2S2 
125250 
000000 

000000 



;10D0 TEST WITH EXPONENT OF THE RESULT r 57 

;SET JP THE LOOP ON EPRCR ACCESS 



IS 

OOOOOC 21 
000000 3S 



LPERR 

:sr 

.WORD 



1 77777 

17777V 


1 i7i ' f 7 


4S 


.WORD 


oooooc 




51 


.WORD 


125252 






.WORD 


if f i 1 / 


1 7 7777 


bS 


.WORD 






71 


213 








204 






8$ 


ERROR 








ERROR 






35 








;N0O0 TEST UITH 














LPERR 








JSR 


000000 


UUUUUU 


is 


.word 


146314 




2S 


.WORD 


167737 

nrmmn 
uuuuuu 




3S 


.WORD 
.UORO 


1 77777 

if//// 




4S 


.WORD 


led' co 






.WORD 


177777 


177777 


5S 


• WORD 


177777 




bS 


.WORD 


12572b 






.WORD 






7S 


210 








204 






8S 


ERROR 








BR 








ERROR 






3S: 






;f1000 TEST UITH 






1 g f If - 








LPERR 


027422 






JSR 


000000 


000000 


IS 


.WORD 


000000 


000000 


2S 


.WORD 


000000 


000000 


3S 


.WORD 



PC.atftODQSUB 
S62S2.1252S2 
125252.125250 
40300,0.0.0 



.WORD 0.0.0.0 

56377,-1,-1.-4 



125252.125252 



> i 
9S 

77 



AC 

FSRC 

FRAC T IONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
ST 526 TO 134 INTO 135 



TEST UITH EXPONENT OF THE RESULT = 79 

; SET UP THE LOOP ON ERROR ADDRESS 
;AC 
;FSRC 

; FRACTIONAL RES. 
INTEGER RES. 
; ERROR FRACTIONAL RES. 
; ERROR INTEGER RES. 



PC.SmOOOSUB 
140240,0.0,0 

63714,146314 

163777,-1 

162531.125726 

-1,-1.-1.-1 



63777-1 
162S3I. 125726 



70 
9S 

100 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



;ST 526 BAD SIGN 



TEST UITH EXPONENT OF THE RESULT r 57 

; SET UP THE LOOP ON ERROR ADDRESS 

:AC 

40340.0.0.0 ;FSRC 
0.0.0,0 ; FRACTIONAL RES. 



pc.atNOOOSUB 

56200,0.0,1 



C09 



■*:*ce; -K-orrpB-H pop :: 

DCCPBfi.FU Ol-NCV-Tb 51:2b 



5815 
581b 
5817 
5818 
19 



5821 
5822 
5823 
5824 
5825 
5826 
5827 
SS2S 
5829 

5ex 

5831 
5e32 
5823 
5834 
5835 
5836 
5E37 
5836 
532*3 
58MC 
S8ii 
53M8 
^3 

5845 
58% 
5347 

s&*e 

58*9 
58SC 
5851 
5852 
5853 
585M 
5855 
5856 
5857 
5858 
5859 
5860 
5861 
5862 
5663 
5064 
5865 
5866 
5867 
5866 
5869 
58 7 : 



C26454 
026462 
026464 
026472 

83! 

326504 

D26512 
326514 
02651b 



Q2b5lb 
02651b 
026520 
326524 
026S32 
02653M 
026542 
026544 
026552 
326554 
326562 
026564 
026572 
026574 
026602 
026604 
026606 
02661C 

026612 
026614 
02661b 



0563HC 300000 
000001 

040000 oooooc 
nooooo 

oooooc 



1 

000213 
D002CH 
lOMiCl 

300401 
134131 



104413 
004737 
056000 
000001 
040340 
000000 
040100 
000000 
056140 
000001 

oooooc 

000000 

3S6I4C 
0COCC1 
000213 
000200 

104102 

300401 
104132 



027422 
OOOOOC 

000000 

000000 

oooooc 

000000 
300000 



2-* FPF CIAGNCS' 
T17 



COOOCC 41 
000000 5S 
OOOOOC bS 

-$ 
as 

91: 



: part 2 mem 27aoob) 

HOOC TEST 



.WORD 

-WORD 

UORD 

213 
204 
ERROR 

BR 

ERROR 



5b340. 0.0.1 
40000.0.0.0 
5b340. 0.0.1 

101 

9S 

101 



Ol-40V-7b 21:1= Pm^E .Zz 

: INTEGER RES. 

; ERROR FRACTIONAL RES. 

; ERROR INTEGER RES. 

;FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 
; CONSTANT BAD (NOT 5b) 
;0R ST 52S TO 050 INTO 152 



:H0D0 
HHH7: 



000000 1$ 
OOOOOC 2$ 
000000 3S 
OOOOOC 41 
000003 SS 
COOOCC bS 
71 
8S 

95: 



LPERR 

JSR 

.WORD 



PC.3IM000SUB 
56000.0.0,1 



TEST UITH EXPONENT OF THE RESULT = 5b 

; SET UP THE LOOP ON ERROR ADDRESS 
AC 

;FSRC 

; FRACTIONAL RES. 
INTEGER RE5. 
; ERROR FRACTIONAL RES. 
; ERROR INTEGER RES. 



.WORD 
.WORD 
.UORD 
.WORD 
.UORD 



40340.0.0.0 
40100,0.0,0 
56140,0,0,1 
0.0,0,0 
56140,0.0.1 



213 
200 
ERROR 

BR 

ERROR 











:N000 


TEST UITH 


02661b 








faun 




02661b 


104413 








LPERR 


026620 


004737 


027422 






JSR 


026624 


051177 


177777 


177777 


IS: 


.UORD 


026632 


177777 










026634 


040200 


000000 


000000 


2S: 


.UORD 


026642 


000000 










026644 


040177 


177760 


000000 


31: 


.UORD 


026652 


000000 










026654 


051177 


177777 


177760 


41: 


.UORD 


026662 


000000 










026664 


177777 


177777 


177777 


51: 


.UORD 


026672 


177777 










026674 


177777 


177777 


177777 


61: 


.UORD 


026702 


177777 










C26704 
326706 


oooioc 






71: 


217 
200 



102 

51 

102 



PC.StffODOSUB 

5ll77.-l.-l.-l 

40200.0.0,0 

40177,-20.0,0 

51177,-1.-20,0 

-1,-1.-1.-1 

-1.-1.-1,-1 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
BAD CONSTANT (NOT 56) OR 
ST 525 TO 150 INTO 05C 



SET UP THE LOOP ON ERROR ADDRESS 

AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



v:-0£:-i;-Dfrpe-s POP II 



58' i 

5873 
5874 
5875 
587% 
5877 
5878 
5879 
5860 
5881 
5882 
5883 
588M 
5885 
5886 
5887 
5888 
588S 
5890 
5891 
5832 
5893 
5894 

sess 

58% 
5897 
5898 
5899 
5300 
5901 
5902 
5903 
5904 
5905 
5906 
5907 
5908 
5909 
S91C 
5911 
5912 
5913 
5914 
5915 
5916 
5917 
59.' 8 
5919 
5920 
5921 
5922 
5923 
5924 
5925 
S92fc 



02b7l2 
026712 
026714 
02671b 



02671b 
02671b 
026720 
026724 
026732 
026734 
026740 
026744 
326752 
026754 
026760 
026764 
026772 
026774 
027002 
027004 
027006 
027010 

027012 
027014 

02701b 



02701b 
02701b 
027020 
027024 
027030 
027034 
027042 
027044 
027052 
027054 
027060 
027064 
027072 
037074 
027102 
027104 
02710b 
027110 
027112 
027114 
02711b 



0271 ib 
02711b 



104C~C 
000401 
104071 



104413 
004737 
040200 
000000 
047577 
176000 
031600 
000000 
047577 
176000 
000000 
000000 
047577 
177777 
000200 
000200 
104103 

000401 
104104 



104413 
004737 
047777 
177000 
040200 
000000 
000000 
00 0000 
047777 
177000 
000000 
000000 
177777 
177777 
000213 
000204 
104105 
000401 
104071 



134413 



34 r«= OIAGNCS 
T17 

BS: 



91: 

;4C0D 
HHH9: 



D09 



Ol-NCV-76 21: IS KC£ 1C7 









LPERR 


027422 






JSR 


mmnn 


0OOQ00 




UORD 






2S: 


.UORO 


IT^w 






.WORD 


000000 


003000 


3S: 


.UORO 


177777 




4$: 


.UORO 


000000 






.UORO 


000000 


000000 


51: 


.UORO 


177777 




bl: 


.UORO 






71: 


200 








200 






6S: 


ERROR 








BR 








ERROR 



0 27422 
177777 
000000 
000000 

000000 

177777 
000000 
000000 

177777 



TIC FART 2 TftCYll 27U006) 
nooc TEST 

ERROR 70 
8R 9S 

ERROR 71 



TEST UITH EXPONENT Of THE RESULT = 30 

; SET UP THE LOOP ON ERRCP ADDRESS 
AC 

;FSRC 

; FRACTIONAL PES. 
INTEGER RES. 
; ERROR FRACTIONAL RES. 
; ERROR INTEGER RES. 



PC.ailODDSUB 

40200,0.0.0 

47577.-1 
I7b000.1 
31bOO.6.0.0 

47577.-1 
17bOO0.0 

o.o.Q.6 



475; 



103 
9S 



. 1 . 



l.-l 



9S: 

;N000 
HHH10 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
(NORMALIZE) ST 532 TO 122 
INTO NORM. 

AC V 1 <= X14 

OR ST 733 TC 15b INTO 157. 



IS 

000000 2S 
000000 31 
4S 

177000 51 
177777 bl 
71 
81 

91: 



LPERR 

JSR 

.UORO 

.UORO 

.UORO 



PC.aanODOSUB 

47777-1 
177000.0 
40200,6,0,0 



TEST UITH EXPONENT OF THE RESULT = 31 

•SET UP THE LOOP ON ERROR ADORES; 
AC 

;FSHC 

; FRACTIONAL RES. 
INTEGER RES. 
; ERROR FRACTIONAL RES. 
; ERROR INTEGER RES. 



.UORO 0,0.0,0 



.UORO 
.UORO 
.UORD 



47777.-1 
177000, 0 
0,0,177000,0 



.UORD -1.-1,-1,-1 



213 
204 
ERROR 
BR 

ERROR 



105 
91 

71 



:HOOD 
HHH11 



TEST UITH EXPONENT OF THE 
uPERR 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
(BUT FD) STORE X10 



RESULT = 0 

;SET UP THE LOOP ON ERROR ADDRESS 



EQ9 



-df">b-h pop :: 

:>f'P9H.Pll Ol-NOV-76 21:Ct> 



34 FPP DIAGNCS' 
Tl? 



5927 
5928 

5930 
5931 
5932 
5933 
5934 



5937 
5936 
5939 
5940 
5941 
5942 
5943 
59**4 
59H5 
59% 
59S7 
59MB 
5949 
5950 
5951 
5952 
5953 
5954 
5955 
5956 
59S7 
5956 
5959 
5960 
5%1 
5962 
5963 

g 

5966 
5%7 
5%8 



597 
5974 
5975 
5976 
5977 
5978 
5979 
5980 
5981 
5982 



C27120 
027124 
027132 
02713M 
027140 
027144 
027150 
027154 
027162 
027164 
027172 
027174 
027202 
027204 
027206 
027210 
027212 
027214 
027216 



027216 
027216 
027220 
3272PM 
327230 
027234 
027242 
027244 
027250 
027254 
027262 
027264 
027272 
027274 
027302 
027304 



027312 
027314 
027316 




027324 
027332 
027334 

027344 
027352 
027354 
027362 
027364 



004737 
04C 



040177 
127272 
040177 
127272 
000000 

09009c? 

177777 
0 00000 
177777 
000200 
000200 
104070 
000401 
104106 



104413 
004737 
003377 
177777 
040200 
000000 
0Q3377 
177777 
000000 
000000 
177777 
177777 
000000 
177777 
000200 

000401 

104107 



104413 
004737 
040300 
000000 
020200 

SSSoO 
000002 
000000 
000000 

000000 



•i; PART 2 MACY11 2"M006, 
H0DC TEST 



027422 
000000 

072727 
072727 
072727 
072727 
000000 

177777 

oooooc 



027422 
177777 
05252S 
000000 

177777 
052525 
000000 

177777 

000000 



027422 
000000 

000000 

000000 

000000 

oooooc 



OOOOOC 11 
2$ 
3$ 

OOOOOC 4$ 
177777 5S 
177777 6S 
7S 

as 



9S: 

:rtOOO 
HHH12 



JSR 
.UORD 

.WORD 
.UORO 
.UORO 
.UORO 
.UORO 

.UORO 

.UORO 

200 
200 
ERROR 
BR 

ERROR 



pc.aiMODDSue 

40^00.0.0.0 
40177.72727 

127272.72727 

0.0.0.6 
-1.-1,-1.-1 

0.0.-1,-1 



70 
91 
106 



01-N0V-76 21:12 PAGE 108 
AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 

; ST 246 TO 126 INTO 127 (BUT f[ 



II 

OCOCOO 21 
3S 

000000 4S 
177777 5S 
177777 6S 
7$ 
9$ 



LPERR 
JSR 



TEST UITH EXPONENT OF THE RESULT = -115 

; SET UP THE lOOP ON ERROR AOORESS. 
;AC 
;FSRC 

; FRACTIONAL RES. 
INTEGER RES. 
; ERROR FRACTIONAL RES. 
; ERROR INTEGER RES. 



PCJtflOOOSUB 

.UORO 40200.0,0.0 

.UORO 3377.-1 
.UORO -1.52525 
.UORO 0,6.0,0 



.UORO 



9S: 

;NOOC 
HHH13: 



■1,-1.-1.-1 
.UORO 0,0.-1.-1 
200 

I880R 70 
BR 9S 
ERROR 107 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 



;ST 446 TO 126 INTO 127 iBUT FD: 



000000 IS 

000000 2S 

000000 3S 

000000 4S 

177777 5$ 



LPERR 

JSR 

.UORO 



PC.3IN0DDSUB 
40300,0,0,0 



TEST UITH EXPONENT OF THE RESULT r -63, IN ROUND NODE. 

SET UP THE LOOP ON ERROR AOORESS. 
AC 

.UORO 20200.0,0,1 ;FSRC 
.UORO 20300,0,0,2 {FRACTIONAL RES. 
.UORD 0,0,0,0 ; INTEGER RES. 

.UORD 0,0,-1.-1 ; ERROR FRACTIONAL RES. 



F09 



•wircec-ii-Dfe-PB-A 

DfpPBfi.Pll Ql-NOX 



POP 11 34 FPP DIAGNOSTIC PART 2 NACYH 27il00b) 
-76 21:0b T17 MOOD TEST 



01-N0V-76 21:12 PAGE 1C9 



5963 
5984 



5989 
5990 
5991 
5992 
5993 
=994 
5995 
59% 
5997 
5999 
5999 
bOCC 
bOCl 
5002 
b3C3 
bOOM 
©COS 
500b 
bOC7 
BC08 
b009 
b£iC 

be:: 

6C12 
bCl2 
BC1H 

bo:s 

bClb 

£3 is 

b019 
b320 
b02l 
bQ22 
b023 
b024 
5025 
b02b 
b027 
b028 
5029 
BOX 
b03l 
E>032 
B033 
bC34 
b035 
b03fc 
t037 



C27372 177777 

027374 1 77777 I 

027402 177777 

027404 000200 

02740b 000200 

027410 104110 

027412 000401 

027414 104071 

32741b 00C137 C3C020 



177T 



bC3e 



027H22 012S01 

027424 012700 000200 

027430 170100 

027432 010100 

027434 172410 

02743b 012700 025702 

027H42 172S10 

027H4M OlblOO OOOObO 

027450 170100 

027452 012737 02746* 00123b 

0274b0 010100 

0274b2 0b2700 000010 



bS 
7S 

es 

9S: 



.UORO 
200 

BR 

ERROR 
JNP 



•l.-l.- 



110 
9S 

71 

9IHHHD0NE 



; ERROR INTEGER RES. 

;FPS BEFORE EXECUTION. 

;FPS AFT" 

ST 127 



; GO TO THE NEXT "EST. 



THIS SUBROUTINE. N0DDSU8. IS CALLED TO SETUP THE 

OPERANDS. EXECUTE THE MOOD INSTRUCTION AND CHE r K THE RESULTS. 

IT IS CALLED THUS: 



ACARG: 

FSRCARG: 

FRES: 

INTRES: 

ERFRES: 



.WORD 
.WORD 
.UORO 
.WORD 
WORD 



ERINTRES: .WORD 



F?S8 
FPSA 
ERR1 

ERR2: 
CONT: 



.UORO 
.UORO 
ERROR 
BR 

ERROR 



X ■ X i X i X 

x,x,x,x 

X a X f X i X 

x f x.x,x 

X j X j X i X 
X t X • X i X 
X 

X 

X 

CONT 

X 



AC OPERAND 
FSRC OPERAND 
FRACTIONAL RESULT 
INTEGER RESULT 
ERROR FRACTION RESULT 
ERROR INTEGER RESULT 
FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
FRACTION ERROR 

; INTEGER ERROR 
; RETURN AODRESS 



THE MOOD 



THE OPERANDS ARE SET UP (USING ACO FOR THE AC ARGUMENT) . 
INSTRUCTION IS EXECUTED. THEN THE RESULTS ARE RETRIEVED. 

IT IS REPORTED HERE. IF THE FRACTION IS INCORRECT IT IS COMPARED UITH 



FAIl 



HERE. iF THE ANTICIPATED 
PASSES CONTROL TO THE 



NOT CORRECT THEN IT IS COMPARED UITH THE ANTICIPATED INTEGER 
FAILURE. IF THIS DOEN'T MATCH THEN THE ERROR IS REPORTED HERE. 
IF A HATCH IS MADE HOUEVER, M000SU8 UILL RETURN CONTROL TO THE ERROR 
CALL AT ERR2. 



N0DDSU8: MOV (SPH.Rl 

MOV §200, RO 

LDFPS RO 

NOV Rl.RO 

loo (rokaco 

NOV tNODPl.RO 

LDD (RO).ACl 

NOV bO(Rl),RO 

LDFPS RO 

MOV tlS.3tlTMP2 

NOV Rl.RO 

ADD 110, RO 



:GET A POINTER TO THE ARGJMENTS 
SET FD MODE. 

SET UP ACO 

PUT A BACKROUNO PATTERN INTO AC1. 
SET UP THE FPS. 

{COMPUTE THE ADDRESS OF THE FSRC. 



G09 



•«:•€£:- 1 1 -DFCPB-A POP 11 34 FPP DIAGNOS T IC PfWT 2 NACY11 27(100b) 01-N0V-7b SI : 12 PAGE HQ 

2«"P&a.Fll Q;-NCV-7b 21:0b T17 MOOD TEST 



bC39 
bOHO 
b041 
b042 
43 



b045 
bO% 
b047 
b048 

bOSC 
bOSi 
&0S2 
bOS3 
b054 
bOSS 
bOSb 
bOS7 

bose 
boss 

bObO 
bObl 
&082 
b083 
b084 
bOb5 
bObb 
b0b7 
bObfl 
bOfcS 
b070 
b07l 
bC72 
bG73 
b07M 
b07S 
b07b 
b077 
bC78 
b07S 
b080 
b08l 
b082 
b083 
b09H 

boes 

b08b 
b087 
B088 
b08S 
B090 
bO*31 
bOS2 
bQ<33 
b2<** 



027bb2 
Q27b6fc 

Q27b70 
027b74 
027700 
027702 
027704 
02770b 
027710 



02748b 


171412 






IS: 


M0DC 


027470 


170204 








STFPS 


027472 


012700 


QOC20C 

WW WW WW 






MOV 


027478 
527500 


170'QO 
012700 


03000C 






LDFPS 

w w* r w 

MOV 


027SOM 


174010 








STD 


02750b 

W%» • «iW 


012700 


0300 '0 

WW WW * w 






MOV 


027512 

Wb * Jib 


174110 








STD 


027514 


010102 








MOV 


027Slb 


010237 


001240 






MOV 


027S22 


0b27C2 


000010 






ADD 


02752b 


010237 


001242 






MOV 


027S32 


082702 


000010 






ADO 


02753b 


01Q237 

W A WWW' 


001244 

WW ib ' ' 






MOV 


027542 


082702 


000010 






ADD 


0275% 


010237 


00124b 






MOV 


027552 


012737 


030000 

wwWWW 


001250 




MOV 


027580 


012737 


030010 


0012 C 2 

WW A W«*b» 




MOV 


0275bb 


0lbl37 


000082 

WW. WWWW 


00125b 

WW ibJU 




MOV 


027574 


010437 


00 1254 






MOV 


027b00 


012702 


030000 

wwwwww 






MOV 


027bOH 


010103 

W A w A WW 








MOV 


027b0b 


082703 








ADD 


Q27b 12 


012705 


000004 






MOV 


027blb 


022223 






2S: 


CMP 


027b20 


001020 








BNE 


027b22 


077503 








S08 


027b2M 


012702 


030010 






MOV 


02 7b 30 


010103 








MOV 


027b32 


082703 


000030 






ADO 


027b3b 


012705 


000004 






MOV 


327542 


022223 






3f: 


CMP 


027b44 


00102b 








BNE 


027b% 


077503 








SOB 


027bSO 


02blOM 


0000b2 






CMP 


027b54 


001042 








BNE 


027b5b 


0001b! 


000072 




9$: 


JMP 



(R0),AC0 
R4 

■200.R0 
RO 

•M0DDT0.R0 
AC0.(R0) 
•MOODTl.RO 

AC1, (R0) 

R1.R2 

R2.atiTMP3 
•1D.R2 
R2 A il$TMP4 
•10.R2 
R2.3ISTMPS 
I10.R2 
R2.3lSTNPb 
•MOOOTQ.aiSTMP? 

•noooTi.atsTMPio 

b2(Rl).3iS T MPl2 
R4,3tStMPll 

•M00DTQ,R2 
R1.R3 
•20.R3 
•4.RS 

CR2)* f (R3)+ 

mi 

RS.2S 

•M0D0T1,R2 
R1.R3 
I30.R3 
•4.R5 

(R2)*,iR3)+ 
15S 
R5.3S 



; EXECUTE THE TEST INSTRUCTION. 

;GET THE FPS. 
;SET FD MODE. 

;GET THE FRACTIONAL RESUL\ 
;GET THE INTEGER RESULT. 

;SAVE THE DATA IN CASE OF ERR0F. 



b2(RD,R4 
20S 



72CR1) 



012702 
010103 
082703 
012705 
022223 
001005 
077503 
010102 
082702 



030000 

000040 
000004 



0000b4 



FRACTIONAL ERROR. 



lbs 



50S: 



H0V 
MOV 
ADD 
MOV 
CMP 
BNE 
SOB 
MOV 
ADD 



IM0DDT0.R2 
R1.R3 
I40.R3 
•4.R5 

(R2H,(R3) + 
US 

R5.50S 

R1.R2 

•b4,R2 



; CHECK THE FRACTIONAL RESULT. 

; BRANCH IF INCORRECT. 
; CHECK THE INTEGER RESULT. 

; BRANCH IF INCORRECT. 

; CHECK THE FPS. 

; BRANCH IF INCORRECT. 

; RETURN. 

;UAS THE FRACTIONAL ERROR ANTICIPA T 

; BRANCH IF NOT ANTICIPATED. 

;THE ERROR UAS ANTICIPATED SO 

: RETURN TO THE ERROR REPORT AT THE 

; CALLING ROUTINE. 



H0<3 



■*:rcec-ii-c*TP8-A pop 

2«"PBA.Pii 01-N0V-76 21 :2b 



34 FPP DIAGNOSTIC PART 2 NACY11 
T17 NODD TEST 



bOSS 
bO% 

6297 
bcse 

6099 
biOO 
6131 
6132 
6103 

fcios 

fclOb 
6137 
6138 
5:139 

bii3 

Bill 

fcl IE 
bil3 
6114 

6115 
ollb 
6117 
6118 
6119 
6123 
b!21 
6122 
6123 
6124 
6125 
6126 
6127 
6126 
6129 
6130 
6131 
6132 
6133 
6134 
6135 
6136 
6137 
6138 
6139 
6140 
6141 
6142 
6143 
6144 

6145 
6146 
6147 
6148 

614<9 

6is: 



C27714 33C112 



327716 
327716 
327723 



327722 
32772b 
327730 
32773M 
327^40 
327742 
327744 
3277% 
327753 



327756 
327756 
3277b3 



3277b2 
327766 
027774 
327776 

330000 
333006 

030013 
030016 

330323 
333323 



104073 
3O07S6 



312702 
313133 
062703 
312705 
322223 
001005 
377503 
013102 
062732 



327754 000112 



104071 
00373b 



010437 
016137 
104072 
000727 

300000 
300000 

000003 
000000 



104412 



330022 000004 



330310 



33307 



001254 

00006*: 



000000 
000002 



001256 



111: 
121: 



JflP 



ERROR 
9R 



iR2) 



70 
91 
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; THE ERROR WAS NOT ANTICIPATES 11 
; REPORT THE INCORRECT FRACTION 



: INTEGER ERROR. 
I 51: NOV 



60S: 



16S: 
171: 



NOV 
ADD 
NOV 
CNP 
BNE 
SOB 
NOV 
ADO 

JNP 



ERROR 
BR 



•N0DDT1.R2 
R1.R3 
•5B.R3 
I4.R5 

(R2)+, (R3)+ 
171 

R5.60I 
R1.R2 
•76, R2 

iR2) 



71 
9S 



;WAS THE INTEGER EPROR ANTICIPATES' 



; BRANCH IF NOT ANTICIPATED. 

;THE ERROR WAS ANTICIAPTED SO RETURN 
;T0 THE ERROR REPORT IN THE CALLING 
: ROUTINE. 



;THE ERROR UAS NOT ANTICIPATED SO REPOP 1 
:THE INTEGER FAILURE HERE. 



:FPS INCORRECT. 
201: NOV 
NOV 

21S: ERROR 
BR 



R4.3HTNP11 ; REPORT INCORRECT FPS. 

62lRl),aifTHP12 

72 

91 



300000 HODDTO: .WORD 0.0,0,0 



000000 N00DT1: .WORD 3,0,0.0 



HHHDONE: 



RSETUP ;G0 INITIALIZE THE FPS AND STACK; AND 

SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G'J. 



*TEST 20 UNOER\0VER FLOW, USING NOOF WITH TRAPS DISABLED. TEST 

*THIS IS A TEST OF THE NODF OVERFLOW AND UNDERFLOW CONDITIONS. IT MAKES 
♦USE OF A SUBROUTINE TO SETUP THE OPERANDS, EXECJTE THE NODF INSTRUCTION 
*AN0 CHECK THE RESULTS. TRAPS ARE DISABLEO DURING THIS TEST. 
* 

TST20: SCOPE 

•.UNDERFLOW TEST. WITH EXPONENT OF THE RESULT = -129. FIU = 1. PI? = 1 



PDP 



34 rpp 



olbl 








siSc 


030024 


1 J441J 




b.53 


03Xco 


□OMi b. 


UCCJcC 


bl54 
bibb 


OJUUJb 


UcucUU 


□4bb b 
nnnnnp 
JUUUUL 

04bb< b 


bibb 


03004c 
DJUCbc 


000123 


b.bc 


177 r77 


nnnnnn 

?395QQ 

1 1 < 77 


C 1 CO 


jjuubb 


1 /• / r « <■ 
1-^1 -yinn 
UMcuOU 


* * > 


blbC 


UJUUb2 




bibl 


3JUUb4 


14cu04 




bloc 


UJUObb 


UJQClc 




b»bJ 


OJUUTC 


10417D 




b*b4 


UJCU- c 


UCu4Cl 
1 J41 1 




s.bb 


CJUU' 4 

nonn"*c 

UJL2J< b 




bibb 






c • t7 
b*b7 








f «f n 

biba 








f 1 f Q 

blb^ 


UJuU/h 








□JUL)' b 


1 J*t4 1 j 




b» / 1 


UJLlUU 


□04737 


□JOJbc 


b;7£ 


□JU1LJ4 


□1 JcOO 


fvinnnn 

LnJDOQO 


bl73 


n-m 1 1 n 
□Jul 1C 


OlUUUU 


JuuOuu 


Si 7M 


UJUI 14 


UUUUUU 


uuuuuu 


b:7b 




UUUUOC 


nnnnnn 
□DCOuC 


C 1 7C 

bi 'b 


JJUlc4 


1 77777 

If f f f 1 


1 77777 

iff/ f f 


Zi'S 


UJUI JU 


177/ 7T 


1 "»7 , *77 

1 1 7 1 < f 


r 1 70 

biTB 

- • "»Q 

Si' 1 


UJUI 34 


□05013 




UJUI Jb 


LBJbUL/4 




bicU 


non 1 llh 


000012 




biei 


nop 1 us 
UJU14C 


nnnaun 
UUUc4U 




bloc 


non 1 uu 
UJU14M 


UUU4U 1 




bioJ 


UJUI 4b 


1L41 '\ 




blo4 


030 ISC 






r 1 or 

bibb 








bloc 








b 1B7 


UJUlbU 






bloc 


UJUlbU 


t nuu 1 o 
1U441 J 

UU4/ J/ 




C ' QP 


nor 1 c3 
UJLlbc 


JJUJbc 


JJUlbb 


nenncs 
UbUUbc 


lebebe 


b.Tl 


nop i c.3 
UJLlbc 


UbUcUU 


nnnnnn 
UUUUUU 


bi^c; 


nin 1 cc 
UJUI bo 

IT3P 1 73 

UJUI 1 c 


nnnnnn 
UUUUUU 


nnnnnn 
UUUUUU 


S l^o 


UUUubc 


1 3C3C3 

lebebe 


bl'ri 


mn t 7t 
UJUI 7b 


UUUUUU 


OuODuU 


c 1 ac 


UJUcUc 


UUUUUU 


OuUUJU 


bl* 


UJUcUb 


nu 1 nnn 
U41UUU 




biT/ 


non3 t n 
UJUclU 


1111 rtn/. 

141UUb 




f. 1 

u 1 TO 


UJUC1C 






bl99 


030214 


104172 




b200 


03021b 


000401 




baoi 


030220 


104173 




b202 








b203 


030222 






b20M 








bzCs 








b22fc 


230222 







DIMNOS" 
T 2C 



: psr t 2 fifiCYii 

UNDERvOVER FL0I 



109 

27 1 100b- 01- 
i. USING HOOF 



N0V-7b 21:12 PfiGE 112 
UITH TRWS :I5ABlEL. t E5 t 





1 PPPR 




TCO 


is. 








35 


U0RD 




.U0RD 


a: 


.U0RO 


bS: 


.U0RD 




42000 




142004 




12 


Si: 


ERROR 




BR 




ERROR 



95: 



: JNDERF. 


.0U EXP 


«f1M2: 






LFERR 




JSR 


IS: 


.WORD 


2S: 


.WORD 


35: 


.WORD 


45: 


.U0R0 


55: 


.UOR0 


bS: 


.WORD 


75: 


5013 




5004 




12 


85: 


NOP 




BR 




ERROR 


95: 





: OVERFLOW TEST 

km: 

LFERR 
JSR 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
.WORD 
41000 
14100b 
10 

ERROR 
BR 

ERROR 



IS 
25 
3S 
45 
55 
bS 
7S 



6S: 



95: 

: OVERFLOW TEST 
HMM4: 



PC.rCDFOV 

20l23.45b7b 

20200.0 

123.45b7b 

0.0 

-l.-l 

-l.-l 



170 
95 

171 



SET JP THE LOOP ON ERROR ftODPEE: 
AC 

FSRC 

FRACTIONAL RES. 

EffiO^FRAC^IONAL RES. 
ERROR INTEGER RES. 
FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 

FEC INCORRECT, UNDERFLOW. 
;AC V 1 i2.3) <= ZEPC. ST 12b. 



DF RESULT = -193, FIU = 0, FID = 1 



PC.atflOOFOV 

10200.0 

10000,0 

0.0 

0,0 

-l.-l 
-l.-l 



95 

171 



SET JP "HE LOOP ON ERROR ADDRESS. 
AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

FEC 



KITH EXPONENT OF THE RESULT = 128. FIV = 1. FID = 1 
SET UP THE ^00P ON ERROR ADDRESS. 



PC.3IH0DF0V 
b0052, 125252 
b0200,0 

52.125252 

0,0 

0.0 



172 

95 

173 



AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

FEC 

BAD FEC ON OVERFLOW. 

ST 520 TO STORE ZERO TWICE 
INTO lb2 



WITH EXPONENT OF THE RESULT = 130, FIV = 0. FID = 1 



J09 



TMifCEC-ii-DffPB-A pop 

^PSn.PII Ol-NOWfc 23:26 
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T20 UNDER\OVER FLOW, USING MODF UITH TRAPS DISABLED. TEST 




>io 
hi 

6212 
6213 

6215 
6216 
6217 
6218 
6219 
6220 
6221 
6222 
6223 
622M 
6225 
6226 
6227 
6228 
6229 
6230 
6231 
6232 
6233 
6234 
6235 
6236 
6237 
6238 
6239 
6240 
6241 
6242 
6243 
6244 
6245 
6246 
5247 
6248 
5249 
6250 
6251 
6252 
62S3 
6254 
6255 
6256 
6257 
6258 
6259 
6260 
6261 
6262 



14 

Q30260 
030262 
030264 
030266 
030270 
030272 
030274 



030274 
030274 
C30276 
030302 
030306 
030312 
030316 
030322 
030326 
030332 
030334 
030336 
030340 
030342 
030344 
0303% 



03C352 
060345 067654 
060200 000000 

booooo SSiooc 



000000 
000000 
000345 
006011 
006006 
000010 
000240 
000401 
104174 



104413 
004737 
160252 
060000 
000000 
100052 
000000 
000052 
041000 
141006 
000010 
10M172 
000401 
104175 
000137 



000000 
000000 
067654 



030352 
125252 
000000 
000000 
1252S2 
000000 
125252 



030746 



IS 
25 
31 
45 
55 
55 
75 



85: 
91: 



lPERR 

JSR 

.WORD 

.WORD 

.WORO 

.WORD 

.WORD 

.WORD 

6311 

6006 

10 

NOP 

BR 

ERROR 



; OVERFLOW TEST 
;AND FIV = 1, F 



IWM5: 



IS 
25 
3S 
4S 
5S 
6S 
75 



85: 



9S: 



PC.aiMODFOV 

60345.67654 

60200,0 

0,0 

D.O 

0,0 

345.67654 



95 

!7u 



WITH EXPONENT OF 
ID = 1 



LPERR 

JSR 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

.WORD 

41000 

141006 

10 

ERROR 
BR 

ERROR 
JNP 



pc.atnoDFov 

160252.125252 

60000,6 

0.0 

100052,125252 
0.0 

52,125252 



172 
95 

175 

SlHMHDONE 



;SET UP THE LOOP ON ERROR ADDRESS. 
AC 

F5RC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

FEC 



;ST 520 TO 162 INTO STORE ZERO TWICE. 



THE RESULT = 128, RESULT NEGATIVE 

;SET UP THE LOOP ON ERROR AOORESS. 
AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 

FPS AFTER EXECUTION. 

FEC 



;ST 517. BAD SIGN. 
;G0 TO THE NEXT TEST. 



THIS SUBROUTINE. NODFOV. IS CALLED TO SETUP THE 

OPERANDS. EXECUTE THE m60F INSTRUCTION AND CHECK THE RESULTS. 

IT IS CALLED THUS: 



X,X 
X,X 
X,X 
X,X 
X,X 



ACARG: .WORD 
FSRCARG: .WORD 
FRES: .WORO 
INTRES: .WORD 
ERFRES: .WORD 
ER INTRES: .WORD X,X 
FPSB: .WORD X 
.WORD 
.WORD 
ERROR 
BR 

ERROR 



FPSA: 

FEC: 

ERR1: 



ERR2: 
CONT: 



X 
X 
X 

CONT 
X 



AC OPERANO 
FSRC OPERANO 
FRACTIONAL RESULT 
INTEGER RESULT 
ERROR FRACTION RESULT 
ERROR INTEGER RESULT 
FPS BEFORE EXECUTION 
FPS AFTER EXECUTION 
FEC 

FEC ERROR 

: INTEGER ERROR 
; RETURN ADDRESS 



THE OPERANDS ARE SET UP (USING ACO FOR THE AC ARGUMENT). THE MODF 

INSTRUCTION IS EXECUTED. THEN THE RESULTS ARE RETRIEVED. 

THE FRACTION PART OF THE RESULT IS COMPARED WITH FRES. IF THIS IS CORREC T 
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6263 
6264 



6267 



6270 
6271 
6272 
6273 
6274 
6275 
6276 
6277 
b279 
6279 
6280 

baei 

6282 
b283 
b28M 

km 

6286 
6287 
6286 
6289 
6290 
6291 
6292 
6293 
6294 
6295 
b2% 
B297 

6298 
6299 
b300 
6301 
6302 
6303 
b30M 
6305 
6306 
b307 
6306 
6309 
b310 
fe311 
b312 
b313 
6314 
6315 
6316 
6317 



0303S2 
0303S4 
03C3S0 
Q3038>2 
030364 
030366 
030372 
030374 
030400 
03W02 
030410 
030412 



012601 
012700 
170100 
010100 
172410 
012700 
172S10 
OlblOO 
170100 
012737 
010100 
062700 



030416 171410 



030420 
030422 
030424 
030430 
030432 
030436 
030440 
030444 

0304% 
030450 
0304S4 
030460 
030464 
030470 
030474 
030500 
030504 
030512 
030520 
030524 
030532 
030536 

030544 
030550 
030554 
03055b 



170204 
170305 
012700 
170100 
012700 
174010 
012700 
174110 

010102 
010237 
062702 
010237 
062702 
010237 
062702 
010237 
012737 
012737 
010437 
016137 
010537 
016137 

012702 
026112 
001025 
32b 162 



000230 

025702 
000030 
03O416 
000004 



000200 
030726 
03073b 



001240 
000004 
001242 
000004 
001244 
000004 
00124b 
03072b 
030736 
001254 
000032 
001260 
000034 

03C726 
000010 



T HEN THE INTEGER PART IS COMPARED WITH INTRES. IF BOTH OF THESE ARE CORPEC 5 
THEN THE FPS IS COMPARED WITH FPSA. AFTER EXECUTION IF NO ERRORS OCCJFPEu 

flflsTSWyPfl ?k C PSKtTl&N T ?f fgJfelWWw. WITH 

THE ANTICIPATED BAD FRACTION. ERFRES . IF THIS DOESN'T MATCH 

THE TRUE RESULT THEN THE ERR6r IS REPORTED HERE. IF THE ANTICIPATED 

FAILURE MATCHES THE TRUE RESULT THEN MOOFOV PASSES CONTROL T 0 THE 

ERROR CALL AT ERR1. LIKEWISE IF THE INTEGER PART OF THE RESULT IS 

NOT CORRECT THEN IT IS COMPARED WITH THE ANTICIPATED INTEGER 

FAILURE. IF THIS DOEN'T MATCH THEN THE ERROR IS REPORTED HERE. 

IF A MATCH IS MADE HOWEVER, MODFOV WILL RETURN CONTROL TO THE EPPO° 

CALL AT ERR2. 



00123b 



MGOFOV: MOV 
MOV 
LDFPS 
MOV 
LDD 
MOV 
LDD 
MOV 
LDFPS 
MOV 
MOV 
ADO 



IS: 



001250 
001252 

00125b 

0012b2 



(SPJ+.Rl 
•200, RO 
RO 

Rl.RO 

(RO).ACO 

IM0DP1.R0 

(RO).ACl 

30(Rl).R0 

RO 

«lS.a«TMP2 

Rl.ftO 

t4.R0 



MOOF (RO),ACO 



000012 000002 



STFPS R4 

STST RS 

MOV 1200, RO 

LOFPS RO 

MOV IMOOFDO.RO 

STD ACO.(RO) 

MOV IHODFDI.RO 

STD ACl.(RO) 

MOV R1.R2 

MOV R2 3ISTMP3 

ADD 14, R2 

MOV R2,3«TMP4 

ADD 14, R2 

MOV R2,fll$TMP5 

ADO 14, R2 

MOV R2.3ISTMP6 

MOV •M0OFD0,3tSTMP7 

MOV iMOOfDl.aiSTMPlO 

MOV R4 i a«TMPll 

MOV 32(Rl).atJTMP12 

MOV R5.atJTMP13 

MOV 34tRl),atJTMP14 

MOV IM0DFD0.R2 

CMP 10(R1),(R2) 

BNE 10S 

CMP 12(R1),2(R2) 



GET P POINTER T 0 THE ARGUMENTS 
SET FD MODE. 

SET UP ACO 

PjT A BACKROUND PATTERN INTO ACl 
SET UP THE F°S. 

; COMPUTE THE ADDRESS OF THE FSPC. 

; EXECUTE THE TEST INSTRUCTION. 

;GET THE FPS. 

;GET FEC. 

;SET rD MODE. 

;GET THE FRACTIONAL RESULT. 

;GET THE INTEGER RESULT. 

;SAVE THE DATA IN CASE OF ERROR. 



; CHECK THE FRACTIONAL RESULT. 
: BRANCH IF INCORRECT. 



^MiNoec-ii-DTPB-H pop :: 

3fTOBfi.Pi: Cl-NGV-76 21:06 



Log 
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b31<3 


C30S64 


001021 




b320 








6)321 


030566 


012702 


030736 


b322 


030572 


026112 


000014 


b323 
b324 


030576 
030600 


001016 
026162 


000016 


b32S 


030606 


001012 




6326 








b327 


030610 


026104 


000032 


b3wS 


03061 u 


W W * Ut. I 




632S 








fc33C 


030616 


026105 


000034 


b331 


030622 


001030 




b332 








b333 


030624 


000161 


000044 


b33M 








b33S 








b33b 


030630 






b337 


030630 


104165 




b33fl 


030632 


000774 




b339 








b340 








b341 


030634 


026112 


000024 


b342 


030640 


001010 




b343 


030642 


026162 


000026 


b344 


030650 


001004 




B34S 


030652 


010102 




b34fa 


030654 


062702 


000042 


b347 








b34e 


030660 


000112 




b24<3 








b3S0 


030662 






b3Sl 


030662 


104166 




b3S2 


030664 


000757 




b353 








b3S4 








b3S5 


030666 


010437 


001254 


b3S6 


030672 


016137 


000032 


b3S7 


030700 


104167 




b3Sfl 


030702 


000750 




6359 








b360 








B3S1 


030704 


010537 


001260 


b362 


030710 


016137 


000034 


fc3b3 


030716 


010102 




b364 


030720 


062702 


000036 


6365 


030724 


000112 




6366 








b3b7 


0X726 


000000 


000000 


b3bB 


030734 


000000 




6369 








6370 


030736 


000000 


000000 


6371 


030744 


000000 




b372 








b373 


030746 






b374 


030746 


104412 





0OO0C2 



000002 



001256 



001262 



9$: 



BNE 

MOV 
CMP 
BNE 
CMP 
BNE 

CMP 
BNE 

CMP 
BNE 

J MP 



10S 

•M0DFD1.R2 
14(R1), (R2< 
15S 

16(R1),2(R2> 
15S 

32(RD,R4 
20$ 

34(Rl),R5 
25S 

44(R1) 



;CHECk THE INTEGER RES. 
; BRANCH IF INCORREC. 



; CHECK THE FPS 
; BRANCH IF 



•.FRACTIONAL ERROR. 
l0$: 

12 J: ERROR 165 
BR 9$ 



INTEGER ERROR. 



lS$ 



16S: 
17$: 



CMP 
BNE 
CMP 
BNE 
MOV 
ADD 

JMP 



ERROR 
BR 



:FPS INCORRECT. 
20$: MOV 
MOV 

215: ERROR 
BR 



24(R1),(R2) 
16S 

26(R1),2(R2) 
16$ 
R1.R2 
•42, R2 

(R2) 



166 
9$ 



R4,31$THP11 

32(RD,aiSTMP12 

167 



INCORRECT 



; CHECK THE FEC. 

; BRANCH IF INCORRECT. 

; RETURN. 



; THE ERROR WAS NOT ANTICIPATED SC 
; REPORT THE INCORRECT FRACTION HE&E. 



;WAS THIS ERROR ANTICIPATED' 
; BRANCH IF NOT. 

; THE ERROR WAS ANTICIAPTED SO RETURN 
TO THE ERROR REPORT IN THE CALLING 
; ROUTINE. 

;THE ERROR WAS NOT ANTICIPATED SO REPOR T 
•THE INTEGER FAILURE HERE. 



; REPORT INCORRECT FPS. 



: REPORT FEC ERROR. 

25$: MOV R5.31STMP13 

MOV 3MlRU,3i$TMP14 

MOV R1.R2 

ADD M36.R2 

JMP (R2) 



000000 MODFDO: .WORD 0,0,0,0 

000000 M0DFD1: .WORD 0.0,0,0 
MMMDONE: 

RSETUP 



;G0 INITIALIZE THE FPS AND STACK; AND 



M09 



nfliNoec-ii-ofcpB-ft pdp :i 

DfFPBA.Pll 01-N0V-76 2i:0b 



6375 








6376 








6377 








6378 








6378 








6380 








6381 








6382 








6383 








6384 








b38S 








6386 








6387 








6388 








6388 








6380 








6381 


030750 


000004 




6382 








6383 








6384 


030752 






6385 


030752 


104413 




63% 


030754 


004737 


031366 


6387 


030760 


020252 


125252 


6388 


030764 


125252 


125252 


6388 


030770 


020100 


OOOOOO 


6400 


030776 


000000 




6401 


031000 


000177 


177777 


6402 


031006 


177777 




6403 


031010 


000000 


OOOOOO 


6404 


031016 


000000 




6405 


031020 


020252 


125252 


6406 


031024 


125252 


125252 


6407 


031030 


000000 


OOOOOO 


6408 


031036 


177777 




6408 


031040 


042200 




6410 


031042 


142204 




6411 


031044 


000012 




6412 


0310% 


104201 




6413 


031050 


000401 




6414 


031052 


104202 




6415 


031054 






6416 








6417 








6418 


031054 






6418 


031054 


104413 




6420 


031056 


004737 


031366 


6421 


031062 


010000 


OOOOOO 


6422 


031066 


123456 


OOOOOO 


6423 


031072 


010200 


OOOOOO 


6424 


031100 


000000 




6425 


031102 


000000 


OOOOOO 


6426 


031110 


000000 




6427 


031112 


000000 


OOOOOO 


6428 


031120 


000000 




6428 


031122 


oooooo 


OOOOOO 


6430 


031130 


000000 
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T20 JNDEfivOVER FLOW, USING MODF WITH TRAPS DISABLED, TEST 

SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER - 
THE USER TYPED CONTROL G'J. 



: •*********************#*********#**#*********#*******#*******##* 

;*TEST 21 UNDER\OVER FLOW, USING MOOD WITH TRAPS DISABLED, TEST 

* 

*THIS IS A TEST OF THE NODO INSTRUCTION'S OVER FLOW AND UNDER FLOW 
tCONOITIONS. A SUBROUTINE IS USED TO SET UP THE OPERANDS, EXECUTE THE 
#NODD INSTUCTION AND CHECK THE RESULTS. 
* 

TST21: SCOPE 



: UNDERFLOW TEST WITH EXPONENT OF THE RESULT = -128, FIU = 1, FID 

NNN1: 



1 



OOOOOO 
177777 
OOOOOO 

177777 



IS 
25 
35 
45 
55 
65 
75 

es: 

85: 



.WORD 
.WORD 
.WORD 

.WORD 

.WORD 

.WORD 
.WORD 
.WORD 

42200 
142204 

12 

ERROR 
BR 

ERROR 



PC.atNODDOV 
20^52.125252 
1252S2.125252 
20100,0,0,0 

177,-1,-1,-1 
0,0,0,0 

20252.125252 

125252,125252 

0,0,-1,-1 



201 
85 

202 



SET UP THE LOOP ON ERROR ADDRESS. 
AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 

FEC INCORRECT ON UNDERFLOW. 
ST 155 (BUT FD) 



: UNDERFLOW TEST WITH EXPONENT OF THE RESULT = -183, FIU = 0. FID = 1 

NNN? • 

;SET UP THE LOOP ON ERROR ADDRESS. 



OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 



IS 
25 
35 
4S 
5S 



LPERR 
JSR 
.WORD 
.WORD 
.WORD 

.WORD 

.WORD 

.WORD 



PC.StnODDOV 
10000.0 
123456.0 
10200,6,0,0 

0,0,0,0 

0,0,0,0 

0,0,0,0 



AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 



"telNOEC-H-DFFPB-fl POP 11 

DFrPBA Pll 01-N0V-76 21:08 
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B431 
b432 
8433 
643M 
6.43S 
8438 
b437 
b438 
643<3 
6440 
6441 
b442 
b443 
b4M4 
b445 
b4Hb 
6447 
b448 
644S 
6450 
6451 
b4S2 
b453 
b454 
6455 
6456 
b457 
b458 
645<3 
6460 
b4fel 
b4b2 
b463 
b4b4 
64bS 
b4bb 
8467 
b488 
6469 
b470 
b471 
b472 
b473 
b474 
8475 
b47b 
8477 
8478 
6479 
6480 
6481 
6482 
6483 
6484 
6485 
6486 



C31132 
031138 
031142 
031144 
031146 
031 150 
031152 
031154 
031158 



000000 
123456 
005213 
?04 
)12 
000240 
000401 
104203 



000000 
000000 



65: 

7$: 

85: 
95: 



.UORD 

.UORD 

5213 

5204 

12 

NOP 

BR 

ERROR 



031158 








NNN3: 


LPERR 


031i56 


104413 








031160 


004737 


031366 






Ten 

JSR 


031164 


080252 


125252 




IS: 


.UORD 


031170 


125252 


125252 






.UORD 


031174 


080100 


000000 


000000 


25: 


.UORD 


031202 


000000 








.UORD 


031204 


000000 


000000 


000000 


3i: 


031212 


000000 








.UORD 


031214 


000177 


177777 


177777 


45: 


031222 


177777 








.UORO 


031224 


OOOOCO 


000000 


000000 


55: 


031232 


000000 








.UORD 


031234 


000177 


177777 




65: 


031240 


1252S2 


125252 






.UORO 


031244 


041200 






75: 


41200 


031248 


141206 








141208 


031250 


000010 








10 


031252 


104204 
•Q0401 






BS: 


ERROR 


031254 








BR 


031258 


104205 








ERROR 


031260 








33: 





0.0 

1 £3456,0 



95 

203 



UITH EXPONENT OF 

PC.atMODDOV 
60252.125252 
12525^.125252 
60100,0,0,0 

0,0,0,0 

177,-1,-1,-1 

0,0,0,0 

177.-1 

125252, 1252S2 



204 
•35 

205 



031260 








NNN4: 




031260 


104413 








LPERR 


031262 


004737 


031386 






JSR 


031288 


080200 


000000 




IS: 


.UORO 


031272 


1252S2 


000000 






.UORD 


031276 


080200 


000000 


000000 


25: 


.UORD 


031304 


000000 








.UORD 


031306 


000000 


000000 


000000 


35: 


031314 


000000 










031316 


000000 


000000 


000000 


45: 


.UORD 


031324 


000000 










031328 


000000 


000000 


exooo 


55: 


.UORD 


031334 


000000 










031338 


000400 


000000 




65: 


.UORD 


031342 


12S252 


000000 






.UORD 


0313% 


008211 






75: 


6211 


031350 


008208 








6206 


0313S2 


000010 








10 


0313S4 


000240 






85: 


NOP 


031358 


000401 








BR 


0313*0 


104208 








ERROR 



; ERROR INTEGER RES. 

;FPS BEFORE EXECUTION. 
;FPS AFTER EXECUTION. 



;ST 047 (BUT FD). 

THE RESULT = 128, FIV = 1, FID = 1 
SET UP THE LOOP ON ERROR ADDRESS. 

AC 

FSRC 

FRACTIONAL RES. 

INTEGER RES. 

ERROR FRACTIONAL RES. 

ERROR INTEGER RES. 

FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 

FEC BAO ON OVEPFLOU. 

ST 520 TO 162 INTO 163 (BUT FD). 



UITH EXPONENT OF THE pr SULl - 130, FIV = 0, FID = 1 
;SET UP THE LOOP ON ERROR ADDRESS. 
;AC 
;FSRC 

; FRACTIONAL RES. 
; INTEGER RES. 
; ERROR FRACTIONAL RES. 
; ERROR INTEGER RES. 



PC.aiHODOOV 
60200.0 
125252.0 
60200,0,0,0 

0,0,0,0 

0,0,0,0 

0,0,0,0 



400.0 
125^52,0 



95 

20b 



FPS BEFORE EXECUTION. 
FPS AFTER EXECUTION. 
FEC 



;ST 520 TO 162 INTO STORE ZERO TUICE. 



BID 



•^•ccr-n-ypB-H °op :: 
: f "py.. c :: ::-*o-"c si:Cb 

fcH8' :_:;&= ::::3" :3:-tm 

6*88 

b4<E 

fc«t<J2 
fc493 

b«<9S 

b4% 

fc*97 

1511 

bSOO 
fe cn, 



bSC3 
b5C4 
bSOS 
bSOb 
65C7 
£>508 
bSOT 
feSID 
B511 
bSle 
bSi3 

b514 

b5l5 
bSlb 
bSl7 

Hi? 

SS2C 
bS2l 

B522 03136b 

bS23 031370 

bS24 03137M 

b525 03137b 

bS2b 031400 

SS27 031402 

bS28 03140b 

SS29 031410 

bS3G 0314H 

b531 03141b 

bS32 031424 

bS33 03142b 
bS34 
b£35 
bS3b 

bSJ7 031434 

bS38 03143b 

bS3S 031440 

bS40 031444 

b5-*l 03144b 

bS-»2 031452 



01-NOV-rfe 31:12 P&iE 
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012b0l 

012700 0002X 
170100 
010100 
172410 

012700 025 702 
172S10 

OlblOO OOOObO 
170100 

012737 031432 00123b 
010100 

082700 000010 



031432 171410 



170305 
170204 

012700 000200 
170100 

012700 031754 
17401C 



91: 



3«NNND0NE 



;G0 TO NEXT TE5 T . 



T HIS SUBROUTINE. NODDOV. IS CALLED TO SETUP THE 

OPERANDS, EXECUTE T HE HOOD INSTRUCTION AND CHECK THE RESULTS. 

IT IS CALLED THUS: 



ACARG: .WORD 
FSRC ARC: .WORD 
FRES: .WORD 
INTRES: .WORD 
ERFRES: .WORD 
ERINTRES: .WORD 
FPS8: .WORD 
.WORD 
ERROR 
BR 

ERROR 



FPSA: 
ERR I: 

ERR2: 

CONT: 



X.X.X.X 
X ^ X | X , X 
X i X , X i X 
X f X i X i X 

x.x.x.x 

X i X j X , X 

X 
X 

CONT 

X 



AC OPERAND 
FSRC OPERAND 
FRACTIONAL RESULT 
INTEGER RESULT 
ERROR FRACTION RESULT 
ERROR INTEGER RESULT 
FPS BEFOREEXECUTION 
FPS AFTER EXECUTION 
FRACTION ERROR 

INTEGER ERROR 
RETURN AOORESS 



THE OPERANDS ARE SET UP (USING ACO FOR THt AC ARGUMENT). THE MOOO 
INSTRUCTION IS EXECUTED. THEN THE RESULTS ARE RETRIEVED. 
THE FRACTION PAST OF THE RESULT IS COMPARED WITH F«S. IF THIS IS CORRECT 
THEN THE INTEGER PART IS COMPARED WITH INTRES. IF BOTH OF THESE ARE CORRECT 
THEN THE FPS IS COMPARED WITH FPSA. AFTER EXECUTION JENO EfWORS OCCURRED 

THEN NOOOOV WILL RETURN TO CONT. IF THE FPS HAS INCORRECT 

IT IS REPORTED HERE. IF THE FRACTION IS INCORRECT IT IS COMPARED WITH 
THE ANTICIPATED BAD FRACTION. ERFRES. IF THIS DOESN'T MATCH _ 
THE TRUE RESULT THEN THE ERROR IS REPORTED HERE. IF THE ANTICIPATED 

not correct then it is compared with the anticipated integer 
failure. if this doen't match then the error is reported here, 
if Snatch is maoehowever, moooov will return control to the error 
call at err2. 



MOODOV: 


MOV 




MOV 




LDFPS 




MOV 




LOO 




MOV 




LOO 




MOV 




1 UFPS 




fiOV 




MOV 




AOO 


IS: 


MOOO 




STST 




STFPS 




MOV 




LDFPS 




MOV 




STD 



(SPH.Ri 

•200.R0 

RO 

Rl.RO 

(RO).ACO 

•MOOPl.RO 

(RO).ACl 

bO(Rl),RO 

RO 

•n.atiTMP2 

Rl.RO 
•l&.RO 

(RO),AC0 

R5 
R4 

•200, RO 
RO 

•MODODO.RO 

ACO.CRO) 



:GET A POINTER TO THE ARGUMENTS 
|SET FD MODE. 

;SET UP ACO 

;PUT A BACKROUND PATTERN INTO AC1. 
; SET UP THE FPS. 

; COMPUTE THE AOORESS OF THE FSRC. 

; EXECUTE THE TEST INSTRUCTION. 

;GET THE FPS. 

;GET THE FPS. 

;SET FD MODE. 

:GET THE FRACTIONAL RESULT. 



CIO 



"KlNOEC-i.- 

r^PBA.Pi: 



:^fps-H pop 
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b54S 
b5% 
b547 
bSne 

bSHS 

5550 
b551 
b552 
b5S3 
eS54 
b555 
5556 
&SS7 
5558 
bS59 
5560 
5S61 
b562 
5563 
6564 
5565 
5566 
B567 
bSbfl 
5569 
BS70 
b57l 
b572 
5573 
5574 
b57S 
5575 
b577 
b578 
5579 

bsao 

5582 
bS83 
5584 
5585 
5586 
5587 
5588 
5589 
5590 
5591 
5592 
5593 
5594 
6595 
b5% 
5597 
5596 



231454 
SlHbC 

031462 
031464 
031470 
331474 
031500 
331504 
031510 
031514 
031 sac 
03152b 
03153S 
031540 
0315% 
031552 

031580 
031564 
031566 
031572 
03157b 
031600 
031b02 

031604 
031bl0 
031512 
031blb 
031b22 
031b24 
03lb2b 



031530 
031534 

031536 
031b42 



031b50 
03lb50 
031552 



031554 
031550 
031552 
031555 
031572 
031574 
031575 



3127QC 
1*4110 

010102 
010237 
052702 
010237 
052702 
010237 
052702 
010237 
012737 
012737 
010437 
015137 
010537 
0ibl37 

0127O2 
010103 
052703 
012700 
022223 
001023 
077003 

012702 
010103 
062703 
012700 
022223 
001013 
077003 



025104 
001027 

025105 
001033 



031544 000151 



104175 
000774 



012702 
010103 
062703 
012705 
022223 
001005 
077503 



031754 

000050 
000004 



T21 



JNDER\OVER FLOW, USING NODO UITH TRAPS DISABLED. TES T 



231*54 



00124C 
000010 
001242 
0000 10 
00124M 
000010 
0012% 
031754 
0317b4 
001254 
000052 
001250 
000064 

031754 

000020 
000004 



031754 

000030 
000004 



000052 
000054 
000074 



001250 
001252 

00125b 

0012b2 



21: 



3S: 



95: 



NOV 
STD 

NOV 
NOV 
ADC 
NOV 
ADD 
NOV 
ADD 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 

NOV 
NOV 
AOO 
NOV 
CHP 
BfC 
SOB 

NOV 
NOV 
ADD 
NOV 
CHP 
BNE 
SOB 



CHP 
KC 

CHP 
BNE 

JHP 



•N0DDD1.R0 
AC1.(R0* 

R1.R2 

R2.31STHP3 
•10.R2 
R2.31STHP4 
•10. R2 
R2.3»tTNPS 
•10.R2 
R2.SlSTHP5 

•nooooo,atSTHP7 

•NOOOOl.StSTHPlO 

R4.atSTnPii 

62(Rl).artTHP12 

R5.aistnpi3 

54(Rl),3i$THPl4 

•H00000,R2 
R1.R3 
•20.R3 
•4.R0 

(R2)*,(R3)* 
10S 
R0.2S 

•H00001.R2 
R1.R3 
•30.R3 
•4.R0 

CR2H,(R3)* 
15S 
R0.3S 



;GET THE INTEGER RESulT. 

;SAVE THE DATA IN CASE OF ERR:*. 



;CHECK THE FRACTIONAL RESULT. 

; BRANCH IF INCORRECT. 

; CHECK THE INTEGER RESULT. 

; BRANCH IF INCORRECT. 



52<RD.R4 
20S 

64(Rl).RS 
251 

74CR1) 



; CHECK THE FPS. 

; BRANCH IF INCORRECT. 

; CHECK THE FEC. 



; RETURN. 



; FRACTIONAL ERROR. 
lOS: 

12S: ERROR 175 
BR 95 



: INTEGER ERROR. 
15S: NOV 

NOV 

AOO 

NOV 

501: CHP 
BNE 

SOB 



•H00001.R2 
R1.R3 
•50.R3 
•4.R5 

(R2)*, (R3)+ 
171 

R5.50S 



;THE ERROR UAS NOT ANTICIPATED SO 
: REPORT THE INCORRECT FRACTION HERE. 



;UAS THE INTEGER ERROR ANTICIPATED' 



; BRANCH IF NOT ANTICIPATED 



DID 
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bfeOH 
6605 
6606 
660? 
6608 
66OT 
6610 
66 1 1 
6612 
6613 
6614 
6615 
6616 
6617 

6618 
6619 
6620 
6621 
6622 
6623 
6624 
6625 
6626 
6627 
6628 
6623 
6630 
6631 
6632 
6633 
663M 
6635 
6636 
6637 
6638 
6633 
6640 
66M1 
66M2 
66M3 
6644 
66% 
66% 
66-17 
6648 
66MS 
6650 
6651 
6652 
6653 
66S-* 



031700 
031702 



310102 
062702 



002T2 



031706 000112 
C31710 

031710 104177 

031712 000754 



031714 
031720 
031726 
031730 



331732 
031736 
031744 
0317% 
031752 

031754 
031762 

031764 
031772 

031774 
031774 



010437 
016137 
10H200 
000745 



010537 
016137 
010102 
062702 
000112 

000000 
000000 

000000 
000000 



104412 



001254 

000062 001256 



001260 

000064 00126c 
000066 

300000 000000 
OOOOOC 000000 



10v 
AOO 

;np 

16S: 

17S: ERROR 
BR 

:FPS INCORRECT. 
2CS: NOV 
NOV 

21$: ERROR 
BR 



R1.R2 
■72. R2 

iR2) 



177 
91 



THE ERROR WAS ANTICIAPTEC SC *E'JP' 
TO THE ERROR REPOR* IN T HE CAL-1% 
ROUTINE. 



; T HE ERROR WAS NOT ANTICIPATED SC BE*:*' 
: T HE INTEGER FAILURE HERE. 



R4,3tlTNPil ;REPCR' INCORRECT FPS. 
|2^Rl).3l$TriPl2 

9S 



•REPORT FEC ERROR. 

251: NOV RS,3tfTMP13 

NOV 64lRl).atfTNPl4 

NOV R1.R2 

AOO t66. R2 

JNP (R2! 

NOOOOO: .WORD 0.0.0,0 



N000C1: .WORC 0.0.0,0 



NNNOOfC: 

RSETJP ;G0 INITIALIZE THE FPS AT© STACK; ANC 

;SEE IF THE USER HAS EXPRESSED 
;THE OESIRE TO CHANGE THE SOFTWARE 
; VIRTUAL CONSOLE SWITCH REGISTER .HAS 
;THE USER TYPED CONTROL G'). 

•»*#»#♦#§♦♦*♦♦♦♦♦♦♦♦♦♦♦♦♦♦•♦•♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦»**♦ 

4TEST 22 INTERRUPT CORRECT FLOWS TEST 

♦THIS IS A TEST OF THE 'CORRECT' FLOWS. THIS PART OF THE MICRO CODE 
♦HAS AS ITS PURPOSE INSURING THAT INTERRUPT REQUESTS HADE DURING 
♦CERTAIN LENGTHY FPP INSTRUCTIONS GET HONORED. THIS IS DONE 
♦IN A WAY SUCH THAT IF AN INTERRUPT REQUEST OCCURS DURING ONE 
♦OF THESE INSTRUCTIONS THE STATE OF THAT INSTRUCTION'S 
♦EXECUTION WILL 8E THE SAME AS IF THAT INSTRUCTION HAD NEVER 
♦BEEN FETCHED AND ITS EXECUTION NEVER STARTED. THUS THE NICRO CODE 
♦WILL RESTORE ALL REGISTERS, BACK UP THE PC AND LEAVE THE 
♦FPS AND ACQ THROUGH AC5 UNMODIFIED. 
♦THE INSTRUCTIONS FOR WHICH THIS IS NECESSARY ARE: 

♦ ADO (OR SUB) 

♦ DIV 

♦ NUL 

♦ MOD 

•(BOTH DOUBLE AND FLOATING) 

♦ALL ADDRESSING NODES WILL BE TRIED UITH THE AOOO INSTRUCTION. T HEN 
♦EACH OF THE OTHER INSTRUCTIONS UILL BE TRIED USING NODE 1. 



•^:NDe;-.;--rrog_i pop :J 

bfcSS 
s656 

bbsr 



E10 
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bbbC 



6662 
bbb* 

iSSS 
tbbt 
bbc" 
666S 
6bbS 

667; 
bbTH 
bfc73 
6674 
fcfcTS 
6676 
6677 
bfeTB 
667<3 
668C 

bbei 

6682 
6683 
b£>8S 
6685 
6686 
6607 
6688 
6689 
66 <E 
6691 
6692 
6693 
6694 

6695 
6696 
6697 

6699 
6700 
6701 
6702 
6703 
6704 
6705 
6706 
b707 
B708 
6709 
b7lC 



03177E 

332000 

03200b 
032010 



032014 




032040 
032042 
0320SO 



032054 
032054 
032060 
032062 
032064 
032066 
032066 
032070 
032074 
032102 
032104 
032106 
032110 
032112 
032114 
032120 
032122 



X0004 

032777 000200 147132 



001402 
000137 

012737 
012777 
012737 
000406 

022626 

012737 
000137 



005227 
001002 
104401 
037621 

104413 
004737 
040200 
000300 
123456 

172000 
000240 
005037 
104252 
000401 



0331% 

032040 
000000 
0366% 



03664b 
0331% 



177777 



03264b 
000100 



033130 



000004 
001112 
000004 



000004 



•INTERRUPT REQUEST IN THE PROCESSOR IF A SIT I« 
•REGISTER RNO ONLY WHEN AN FPP INSTRUCTION IS 



•THEREFORE THIS Tf 
•OR NOT THE STATl 

♦this test can al< 



ST WILL 




ON WHETWfO 

when Befepen: 



♦NOTE THAT THIS TEST NEEDS A SPECIAL INTERRUPT MOOUlE. 
•WHICH UILL PROBABLY ONLY BE PRESENT IN DEC'S MANUFACTURING E1VIP0»«EN 
•TO RUN. THIS SPECIAL EQUIPMENT IS DESIGNED TO RAISE AN 

' " ' " SET IN ITS STfT.S 

NCOUNTERED. 

E RUN CONDITIO.* 
' OF THE TEST l{ 
LECTED BY TURN 
•SWITCH REGISTER (PHYSICAL OR VIRTUAL) ON. 

•THE TEST ASSUMES THAT THE TEST EQUIPMENT'S STATUS REGISTER IS AT 
•^OCflTION 777774 (NOTE THAT ALL REFERENCES TO THIS LOCATION ARE 
♦MAOE INDIRECT THROUGH THIS PROGRAMS LOCATION CORINT. SO THAT 
♦IF THE USER HAS MOOIFIED THE TEST EQUIPMENT'S STATUS REGISTER TO 
♦RESPOND TO A DIFFERENT ADDRESS LOCATION CORINT MUST BE 
♦MADE TO CONTAIN THAT STATUS REGISTER'S NEW ACORESS ) . 
♦THIS PROGRAM ASSUMES THAT THE TRAP VECTOR FOR THE TEST EQUIPMENT 
•AGAIN NOTE THAT ALL REFERENCES. TO THIS TRAP VECTOR ARE INDIRECT. 
♦THIS PROGRAM'S LOCATION CORTRP (IF THE TEST EQUIPMENT IS 
•MAOE TO TRAP TO A DIFFERENT VECTOR LOCATION CORTRP MUST CONTAIN 'HE 
♦AOORESS OF THIS VECTOR). 
♦ 

•;♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦♦♦♦♦♦♦♦♦♦♦*♦♦♦♦ 

t§T22: SCOPE 



is :iz. 

THPOJGm 



C0R1: 



C0R2: 



:TEST 
C0R3: 



BIT 

BEQ 
JNP 

MOV 
MOV 
MOV 
BR 

CMP 
MOV 
JMP 



1200,3SWR 
C0R1 

3IC0RDONE 



;SEE IF THE USER HAS DESELECTED THIS 
;TEST USING THE SWITCH REGISTER. 
;IF NOT SEE IF TEST EQUIPMENT IS «?ES£N' 
;ELSE DO NOT RUN TEST. 



atCOROONE 
ADDD MODE 0 



•C0R2.3IERRVECT ;SEE IF THE TEST EQUIPMENT'S STATJS 
•0.3C0RINT : REGISTER TIMES OUT. 

•CPSPUR,3t£RRVECt 

C0R3 ; DIDN'T TIME OUT SO START TEST. 

(SPH.CSP)* :IF THE REFERENCE TIMES OUT DO 
•CPSPUR.atERRVECt 

; NOT RUN TEST. 



C0R33: 



000200 IS: 

21: 
31: 
41: 



INC 
BNE 
TYPE 
.WORD 

LPERR 

JSR 

.WORD 

.WORD 

200 

ADDD 

NOP 

CLR 

ERROR 

BR 



•-1 

C0R33 

CORMES 



PC.aiCORSUB 
40200,100,200,300 



;SET UP THE LOOP ON ERROR ADORESS. 
;ACO 



123456 

ACO.ACO 

atCORFLC 

252 

US 



;R0 
:FPS 

;T£ST INSTRUCTION. 

; RESET INTERRUPT FLAG 

•NO INTERRUPT! T EST EGUI°NENT FAILED. 



F10 
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8711 
b7!2 
b?13 

b71H 
b715 
671b 
b717 
fe7l8 

b7iq 

b720 

b?21 

fc'22 

b723 

672S 

b72S 

b72b 

B727 

fe728 

b"2S 

b73C 

6:731 

fc.?32 

b733 

i73H 

fc73S 

fe73b 

b737 

b"38 

&73<9 

fc7HQ 

c7Sl 

S7M2 

b7S3 

b74S 

fe7H5 

b7St 

b7H7 

b7se 

bTMS 
6750 
bTSl 
b752 
S7S3 
b754 
E.7S5 
b75fc 
b7S7 
b7S8 
b7S9 
fc7bC 
b7bl 
b7b2 
b7b3 
b7bS 
e7bS 
b7bt 



C32124 
03212b 

032126 

03213M 
032142 
03214M 
0321% 
032150 
0321S2 
0321S4 
032lb0 
0321b2 
032 lbs 
0321bb 



D32ibb 
0321bb 
032170 
032174 
032202 
332204 
03220b 
032210 
032212 
032214 
032220 
032222 
03222M 
03222b 




0322% 
0322S0 
0322S2 
0322S4 
0322b0 
0322b2 
0322b4 
0322bb 
032270 

032272 

032272 
032272 
032274 



1C4253 



4737 
OHC201 
111111 
032134 
000217 
172010 
000240 
005037 
104252 
000401 
104254 



104413 
0C4737 
040202 
070707 
03217M 
000205 
172020 
000240 
005037 
1 OS 252 
0OOH01 
10S25S 



10H413 
00S737 

ooolob 

172030 
0OO2H0 
005037 
104252 
00OM03 
10M2S6 
000401 
032234 



104413 
004737 



032b4b 
000555 



C3313C 



51: 
US: 

: T EST 
tOR4: 



2-73C7 1$: 



032b% 
111333 



033130 



032b% 
07173S 



033130 



07274b 



ERROR 253 
ADC MODE 1 



: INCORRECT STATE AT IV r ERRLP T . 



2$: 
3S: 
SS: 



11$: 

:TEST 
CORS: 



LPERR 

JSR 

.UORD 

.WORD 

217 

ADOD 

NOP 

CLR 

ERROR 

BR 

ERROR 



;SET UP THE LOOP ON ERROR ^OPESS. 

PC.aiCORSUB 

40201,555.77007,111111 ;ACC 



IS 

(ROJ.ACO 

BiCORFLG 
252 



IIS 
254 



;R0 
FPS 

;TEST INSTRUCTICN 

; RESET INTERRUPT FLAG 

; REPORT FAILURE. NO INTERRUPT 



ACOD NODE 2 



052525 IS: 

2S: 
3S: 
4S: 



US: 



LPERR 

JSR 

.UORD 

.UORD 

205 

AOOO 

NOP 

CLR 

ERROR 

BR 

ERROR 



;SET UP THE LOOP ON ERROR ADDRESS. 

PC.aiCORSUB 

40202.111333,52525,70707 ;ACO 



IS 

(RO)*.ACO 

atCORFLu 
252 
US 
255 



;R0 
;FPS 

;TE5T INSTRUCTION 

; RESET THE INTERRUPT FLAG 

; REPORT FAILURE. NC INTERRUPT. 

;CORREC T FLOUS FAILED. 



:TEST 


AOOO NODE 


CORb: 




LPERR 




JSR 


IS: 


.UORD 


2S: 


.UORD 


3S: 


20b 


4S: 


ADOD 




NOP 




CLR 




ERROR 




BR 


5S: 


ERROR 




BR 


10S: 


.UORD 



;SET UP THE LOOP ON ERROR ADORES: 

PC.aiCORSUB 
40203,71735.7274b. 1 



US: 

:TEST 
C0R7: 



Q32b4b 



10S 

a(RO)*,ACO 

aiCORFLG 

252 

IIS 

25b 

11S 

IS 



ADOD MODE 4 

PC.aiCORSUB 



LPERR 
JSR 



:ACO 



;R0 
;FPS 

.•TEST INSTRUCTION 

: RESET THE INTERRUPT FLAG 
; REPORT FAILURE. NO INTERRUPT. 

; CORRECT FLOUS FAILED. 

;USED FOR THE ADDRESSING OF the OPERAND 
:IN THIS MODE. 



;SET UP THE LOOP ON ERROR ADDRESS. 



GiO 



•WirCEC-ll-D«"PB-A POP I! 34 cpp DIAGNOSTIC PART 2 MAC II 27(1006) Oi-NOV-76 21:1 = 

DT r PBA.Pli OI-NOV-76 21:06 T22 INTERRUPT CORRECT FLOWS TES T 



6767 

6768 

6769 

6770 

6771 

6772 

6773 

6774 

6775 

6778 

6777 

6778 

6779 

6780 

6781 

6782 

6783 

6784 

678S 

6786 

6787 

6788 

6789 

6730 

6791 

6782 

6793 

6794 

6795 

67% 

6797 

6798 

6799 

6800 

6801 

6802 

6803 

6804 

6805 

680b 

6807 

6808 

6809 

6810 

6811 

6812 

6813 

6614 

6815 

6616 

6817 

6818 

6819 

6820 

6821 

6622 



C32300 
032306 
032310 

MS 

032316 
032320 
032324 
032326 
032330 
032332 



032332 
032332 
032334 
032340 
032346 
032350 
032352 
032354 
032356 
032360 
032364 
032366 
032370 
032372 
032374 
032376 



032376 
032376 
032400 
032404 
032412 
032414 
032416 
032420 
032424 
032430 
032432 
032434 
032436 



032436 
032436 
032440 
032444 
032452 
032454 
032456 
032460 
032464 
032470 



040204 123456 0^0123 

045671 

032310 



1 

000240 
005037 033130 
104252 
000401 
104257 



104413 

004737 032646 

040205 076543 021076 

054321 

032376 

000213 

172050 

000240 

005037 033130 

104252 

000403 

104260 

000401 

032340 



104413 

004^37 032646 

040206 034353 063730 

031323 

032403 

000214 

172060 000001 
005037 033130 
104252 
000401 
104261 



104413 

004737 032646 

040210 07U107 062S26 

055555 

032477 

000204 

172070 000001 
005037 033130 
104252 



li: 

21: 
31: 
41: 



115: 



.WORD 

.WORD 

212 

QOOO 

NOP 

CLR 

ERROR 

BR 

ERROR 



IS: 

2$: 
31: 
45: 



51: 

10$: 
US: 



LPERR 

JSR 

.WORD 

.WORD 

213 

ADOD 

NOP 

CLR 

ERROR 

BR 

ERROR 
BR 

.WORD 



IS: 

2S: 
31: 
4S: 



5S: 
115: 



KS"" 

.WORD 

.WORD 

214 

AOOO 

CLR 

ERROR 

BR 

ERROR 



: TEST ADOD MODE 
C0R10: 

LPERR 
JSR 

IS: .WORD 



25: 
35: 
4S: 



.WORD 

204 

flDDu 

CLR 

ERROR 



40204. 123456, 70123, 4S671 
15*10 
-(RO).ACO 



;P0 
:FPS 

; T EST INSTRUCTION 



3»C0RFLG 
252 
115 
257 



: RESET THE INTERRUPT F W AG 

; REPORT FAILURE. NO INTERRUPT. 

; CORRECT FLOWS FAILED 



.TEST ADDD MODE 
C0R8: 



;SET UP THE LOOP ON ERROR fiCDRES: 

PC.3«C0RSUB 

40205,76543,21076,54321 :AC0 



101*2 

3-CR0),AC0 

atCORFLG 

252 

KS 

260 

115 

IS 



;R0 
FPS 

;TEST INSTRUCTION 

; RESET THE INTERRUPT FLAG 
; REPORT ERROR. NO INTERRUPT. 

; CORRECT FLOWS FAILED. 



:TEST AOOO MOOE 
C0R9: 



; SET UP THE LOOP ON ERROR AOuRESS. 

PC.atCORSUB 

402O,. 34353, 63730. 31323 ;ACO 



15-1 

KRO.ACO 

3iC0RFLG 

252 

IIS 

261 



;R0 
|FPS 

;TEST INSTRUCTION 

; REPORT FAILURE NO TRAP. 



;SET UP THE LOOP ON ERROR ADDRESS. 

PC.3IC0RSUB 

40210,70107,62426,55555 ;ACC 



10S-1 

ai(RO),ACO 

3IC0RF£g 

252 



;R0 
;FPS 

; TEST INSTRUCTION 

; REPORT FAILURE NO TRPP 



HID 
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&823 
682M 
b82S 
b826 
fe827 
B928 
b82S 
fa83C 
B831 
b832 
BS33 
b834 
B835 
b83b 
fe837 
b838 
b83<3 

6840 
S8H1 
b8M2 
B843 
6844 
6845 
6846 
6847 
6848 
684? 
6350 
6851 



6856 
6857 



685' 
6858 

bass 

6860 
6861 
6862 
6863 
6864 
6865 
6866 
6867 
6868 
S86«3 
6870 
b87l 
b872 
b873 
b874 
6875 
6876 
6877 
6875 



C32M72 
032S74 
032476 
032500 
032502 



032502 
032502 
032S04 
032510 
032516 
032520 
032522 
032524 
032526 
032530 
032534 
032536 
032540 
032542 



032542 
032542 
032544 
032550 
032556 
032560 

4 

032566 
032570 
74 
76 
032600 
032602 



032602 
032602 
032604 
032610 
032616 
032620 
032622 
032624 
032626 
032630 
032634 
032636 
032640 
032642 




000MC3 
104262 
OCKHOi 
032-4-H 



10HH13 
004737 
040211 
001122 
032510 
0C0205 
174410 
000240 
005037 
104252 
000401 
104263 



104413 
004737 
040212 
063650 
032550 
000210 
171010 
000240 
005037 
104252 
000401 
104264 



104413 
004737 
040213 
171623 
032610 
000412 
171410 
000240 
005037 
104252 
000401 
10426S 
000137 



032646 
033M45 



033130 



osbb; 



032646 
165411 



0331 30 



03264b 
0456S4 



033130 
033146 



5$: 

1CI: 
111: 

:TES T 
i»ll: 



IS: 

2S 
3S 
4t 



51: 
IIS: 



BR 

ERROR 
BR 

.WORD 



US 

262 
11S 
IS 



LPERR 

JSR 

.UORD 

.UORO 

20S 

DIVD 

NOP 

CLR 

ERROR 

BR 

ERROR 



04b252 IS: 

2S: 
3S: 
4S: 



5S: 
111: 



.UORO 

.UORO 

HULD 

NOP 

CLR 

ERROR 

BR 

ERROR 



054542 IS 

2S 
3S 
4$ 



5S: 
US: 



.UORO 

.UORO 

HOOD 

NOP 

CLR 

ERROR 

BR 

ERROR 
JHP 



; CORRECT FLOUS FAILED. 



DIVD 10DE 1 



;SET UP THE LOOP ON ERROR ADDRESS. 

PC.iiCORSLB 

4CSl 1,33445. 56677, 00 11 22 ;ACO 



IS 

(ROi.ACO 

StCORFLG 

252 

US 

263 



RO 
FPS 

TEST INSTRUCTION 



; REPORT FAILURE. NO TRAP. 
: CORRECT FLOUS FAILED. 



:TEST NULD NODE 1 
C0R12: 

LPERR 
JSR 
.UORD 



PC.3«C0RSUB 

40212,165411.46252,63650 



:SET UP THE lOOP ON ERROR ADDRESS. 
; A\«3 



IS 

210 

(RO).ACO 

8IC0RFLG 
252 
US 
264 



RO 
FPS 

TEST INSTRUCTION 



; REPORT FAILURE, NO TRAP. 
; CORRECT FLOUS FAILED. 



:TEST NODD NOOE 1 
C0R13: 

LPERR 
JSR 
.UORD 



PC.81C0RSU8 

40213,45654.54542, 171623 



;SET UP THE LOOP ON ERROR ADDRESS. 
:ACO 



IS 

412 

(RO).ACO 

StCORFLG 
252 
11S 
265 

3IC0RD0NE 



RO 
F p 5 

TEST INSTRUCTION. 



;REPORT FAILURE NO TRAP. 

; CORRECT FLOUS FAILED. 
{FINISHED TEST! 



:THIS SUBROU T INE. CORSUB. IS CALLED TO SET UP THE OPERANDS 
; AND CHECK THE RESULTS IN THIS TEST. IT IS CALLED THUS: 



•wznoec-::- 

6879 
6880 

bsa: 

B882 

1*3 



no 
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B885 
B8S6 

bear 

bSQS 
B38S 
B89C 
6891 
b892 
S9<33 
b894 

bB9S 

&a% 

b897 
b898 
&m 
b90G 
b9Cl 
b902 
b903 
B90M 
b9QS 
b906 
6907 

b906 
6909 
b910 

ss-u 

b912 
b913 
b914 
b91S 
b91b 
b917 
b9l8 
B919 



>1 
b922 
6923 

6925 
6926 
6927 
692B 
6929 
6930 
b931 
6932 
6933 
b93M 



IS 
2S 



5$: 

1QS: 
US: 



JSR 

.WORD 

.WORD 

.WORD 

INST 

ADR 

ERROR 
3R 

ERROR 
BR 

.WORD 



PC.3IC0RSUB 

X , a , X i X 
X 

x 



252 
11S 

N 

11S 

ADDRESS 



ACO OPERAND 

RO 

FPS 

TEST INSTRUCTION TO BE 
EXECUTED. 

AN ADDRESS OFFSET FOR 
CERTAIN NODES OR NOP. 
NO TRAP ERROR. 

CORRECT FLOWS FAILURE. 
OPTIONAL FOR CERTAIN NODES. 
OPTIONAL FOR CERTAIN NODES. 



C0RSU8 WILL PICK UP A POINTER TO THE ARGUMENTS. IN Rl. ACO. RC ANO 
THE FPS WILL BE SET TO THE DESIGNATED VALUES. THEN THE TEST NODULE 
WILL BE SET UP TO INTERRUPT AND THE INSTRUCTION AT 41 EXECUTED. IF 
NO TRAP OCCURS THEN THE TEST NODULE IS FAULTY. WHEN THE TRAP OCCURS 
THE PC ON THE STACK SHOULD BE MS. AND ACO. RO AND THE FPS SHOULD NOT 
HAVE BEEN MODIFIED. IF EVERYTHING IS CORRECT CORSUB WILL RETURN TO 
5S PLUS TWO. IF AN ERROR IS DETECTED THEN CORSUB WILL RETURN TO THE 
ERROR REPORT AT 5$ 

NOTE THAT A FLAG. CORFLG, IS SET TO -1 WHEN AN INTERRUPT IS PENDING. 
CORFLG IS ZERO OTHERWISE. 



0328% 


005037 


C33130 




CORSUB 


: CLR 


0326S2 


012601 








NOV 


032654 


010102 








NOV 


032656 


012700 


000200 






NOV 


032662 


170100 








LDFPS 


032664 


172412 








LOO 


032666 


016100 


000012 






NOV 


032672 


170100 








LDFPS 


032674 


016100 


000010 






NOV 


032700 


010102 








NOV 


03*2706 




000014 






ADD 




m 


001236 






NOV 


m\i 




177776 
032744 


000220 




CLR 
NOV 


032724 


012767 


177777 


000176 




MOV 


032732 


012777 


177777 


000202 




MOV 


032740 


000161 


000014 






JMP 










: TRAP 


TO HERE 


032744 


005137 


033130 




CORTV: 


COM 


032750 


001060 








BNE 


032752 


012777 


000000 


000 lb2 




MOV 


032760 


170204 








STFPS 



atCORFLG 

(SPH.Rl 
R1.R2 
•200.R0 
RO 

(R2),AC0 

12(RI),R0 

RO 

10(R1),R0 
R1.R2 
•14.R2 
R2,5lSTNP2 

•C0R*TV.3C0RTRP 
•-1, CORFLG 

l-l,3C0RINT 
14(R1) 



SICORFLG 

C0RTV1 

•0.3C0RINT 



R4 



SET FLAG TO INDICATE NO INTERRUPT 
PENDING. 

GET A POINTER TO THE ARGUMENTS. 
;SET ACO. 



; SET UP THE FPS. 
;SET UP RO. 



SAVE AODRESS OF INSTRUCTION IN CASE 
OF ERROR. 

CLEAR THE PRIORITY TO ALLOW IN T EQRJ>TS. 

SET UP THE INTERRUPT VECTOR. 

SET THE FLAG TO INDICATE 

AN INTERRUPT IS PENDING. 

ENABLE THE TEST EQUIPMENT'S 

TRAP FUNCTION ANO GO 

EXECUTE THE INSTRUCTION. 



;FIRST SEE IF AN INTERRUPT WAS PENCIL. 
:IF NOT GO REPORT AN ERROR. 
Imake SURE THE TEST EQUIPMENT 
;IS NOT INTERRUPT ENABLED. 

;GET THE FPS. 



J10 



NAINC€C-11-D«"PB-A 



0""P8A.P11 



01-NOV-7b 21: Ob 



POP II 34 FPP DIAGNOSTIC PART 2 NACY11 27ti00fc) 01-NOV-7b 21:12 PACE 12b 



T22 



INTERRUPT CORRECT FLOWS TEST 



b<335 
b<938 
b<337 
b<338 

m 

bqsi 

b^2 

H3 

b9M5 
b*4b 
b9M7 
b948 
fc9M«3 
b<3SO 
b9Sl 
b952 
b<?53 
b%4 
b9S5 
b%6 
b<357 
b9Se 
b^ 
b%0 
b%l 
b%2 
b%3 
b%4 
b%S 
b%b 
b%7 

b%e 

b%<3 
b«370 
bS7l 
b972 
b«373 
b<374 
b975 
b«37b 
b977 
b<378 
b<379 
b980 

bgei 

b982 
8983 
b984 
b985 
b988 
8987 
b988 
b<389 
b99C 



C327b2 
0327Sb 
032770 
032774 
'77b 



033010 
033014 



03302b 
033032 



012702 
170102 
012702 
174012 

m 

0437 
lb37 

m 

082702 
012237 



37 
37 



000200 
033132 



32 001240 
44 



001250 
001254 

001242 
000010 
00124b 
001252 
00125b 



0330% 


021802 




033050 


□0101k 




033052 






033054 


020081 


000010 


0330b0 


001012 




033082 


010102 




033084 


012703 


033132 


033070 




nnnooM 


033074 


022223 




33307b 


001003 




033100 


077503 




033102 


OOQlbl 


000032 


033108 


OOClbl 


000030 


033112 


011837 


00123b 


03311b 


005037 


C33130 


033122 


022828 




033124 


104288 




033128 


000407 




033130 


OOOOOC 




033132 


000000 


000000 


033140 


000000 




033142 


177774 




032144 


000110 





1$: 



NOV 

LDFPS 

NOV 

STD 

NOV 

NOV 

NOV 

NOV 

NOV 

NOV 

ADD 

NOV 

NOV 

NOV 

CHP 

BNE 
CNP 
CNP 
BNE 
NOV 
NOV 
NOV 
CNP 
BNE 
SOB 
JNP 



CORTVO: JNP 
CORTVi: NOV 



CLR 
CNP 
ERROR 
BR 

CORFLG: .WORD 
CORTNP: .WORD 



•200, R2 
R2 

•CORTNP. R2 

ACO.(R25 

•CORTNP. i«$TNP3 

RO.fltiTHPS 

R4,3«!TNP7 

(SP).3«1TNP11 

RJLR2 

R2!a«ITHP4 
•1&.R2 

(R2H,a«STNPb 

(R2)+.ai$TNPlO 

R2.a«tTHP12 

(SP),R2 

CORTVO 
(SP)+, (SP)+ 
RO.lO(Rl) 
CORTVO 
R1.R2 

•CORTNP, R3 
•4.R5 

(R2)+.(R3)+ 
CORTvfi 
RS.1S 
32?R1) 

30CR1) 

(SP),a«STMP2 



3«C0RFLG 

(SPH.(SP)* 
2bb 

CORDONE 
0 

0.0,0,0 



COR I NT: .WORD 177774 



CORTRP: .WORD 110 



:GET ACQ 



;5EE IF THE TRAP OCCURRED 
;AT THE CORRECT ADDRESS. 

; RESET THE STACK. 
;SEE IF RO IS CORRECT. 
BR IF NOT CORRECT. 
;SEE IF ACQ WAS CORRECT 



; BRANCH IF INCORRECT. 

;IF EVERYTHING IS CORRECT THEN RETURN. 

; CORRECT FLOWS FAILED SO GO REPORT ERROR. 

; AN INTERRUPT OCCURRED WHEN THE FLAG 
CORFLG. DID NOT INDICATE THAT ONE WAS 
; PENDING 50 REPORT SPURIOUS TRAP. 



03314b 
03314b 



104412 



CORDONE: 



RSETUP 



THIS IS THE ADORESS. 177774. OF THE 
TEST EQUIPMENT'S STATUS REGISTER. 
THE CONTENTS OF CORINT CAN BE HOOIFIEO 
IF THIS STATUS REGISTER'S ADDRESS IS 
CHANGED. 

THIS IS THE ADDRESS OF THE TEST EQUIPMENTS 

TRAP VECTOR. LIKE THE STATUS REGISTER'S ADDRESS 

DESCRIBED IMMEDIATELY ABOVE 

THIS VECTOR CAN BE CHANGED. BUT THE 

CONTENTS OF CORTRP NUST INDICATE THE 

CHANGE. 

:G0 INITIALIZE THE FPS AND STACK; AND 



I tmInoec-ii-o«"pb-a pop :: 

S«W2 



C3315C 
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INTERRlPT CORRECT FLOWS TEST 
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b«N5 
b9% 

b9« 
bW 

7000 
7001 
7302 
7003 
7004 
7005 
700b 
70C7 
70C8 
7003 
7010 
7011 
7012 
7013 
7014 
7015 
701b 
7017 
7018 
7019 
7020 
7021 
7022 
7023 
7024 
7025 
702b 
7027 
7028 
7023 
7030 
7031 
7032 
7033 
7034 
7035 
703b 
7037 
7038 
7033 
7040 
7041 
7042 
7043 
7044 
7045 
704fc 



033150 
033150 
033152 
03315b 
033152 
3331bb 
033174 
03317b 
C33200 
033202 
033204 
03320b 
033210 
033214 

033234 
033234 

033240 
033242 
033243 
033244 
033250 

033314 
033314 

033320 
033322 
033323 
033324 
033330 
033334 
033340 
033342 
033344 



104403 
00b 
000 
104401 
000421 



104403 
00b 
000 
104401 
0050b7 
013700 
001414 
00504b 
01274b 



;SEE IF THE USER HAS EXPPESSE: 

; THE DESIRE TO CHANGE THE SOFTWARE 



; THE USE 



TST23: 



. SBTTL END OF PASS ROUTINE 

•#****##«###########*####«**#**#######**###**###*##***#♦***#*« 

* INCREMENT THE PASS NUMBER (SPASS) 

♦INDICATE END-OF-PROGPAM AFTER 1 PASSES THRU THE PROGRAM 
«IF SU12=1 INHIBIT TRACE TRAP 
#IF THE RES A MONITOR GO TO IT 
*IF THERE ISN'T JUMP TO LOOP 



145724 
145120 
14bl3b 
100000 



000004 
005057 
005057 
003257 
042757 
005327 
000001 
003074 
012737 
000001 
033175 

104401 03321b 
000407 

01b74b 14b0b4 



14513G 



5E0P: 

SCOPE 

CLR 

CLR 

INC 

BIC 

DEC 

IEOPCT: .WORD 
BGT 



IEN0CT: 



033252 



01b74b 145572 



;:67l: 
bbS: 



MOV 

.WORD 

IEOPCT 

TYPE 

BR 

.ASCIZ 

MOV 

TYPOS 

.BYTE 

.BYTE 

TYPE 

BP 

. ASCIZ 
MOV 



STSTNM 
STIMES 
IPASS 

I 100000, SPASS 

(PC)* 

1 

SDOAGN 

(PCH,3(PC) + 
1 



ZERO THE TEST NUMBER 

ZERO THE NUMBER OF ITERATIONS 

INCREMENT THE PASS NUMBER 

DON'T ALLOU A NEG. NUMBER 

LOOP' 



• - YES 

; ; RESTORE COUNTER 



.551 ;;TYPE ASCIZ STRING 

541 :;GET OVER THE ASCIZ 

<12><15>/END PASS •/ 



SPASS, -<SP) 



b 

0 

.57$ 
55S 



SAVE SPASS FOR TYPE OUT 
TYPE PASS NUMBER IN OCTAL 
GO TYPE — XTAL ASCII 
TYPE 5 DIGITS 
SUPPRESS LEADING ZEROS 
TYPE ASCIZ STRING 
GET OVER THE ASCIZ 



TOTAL ERRORS SINCE LAST REPORT / 



001313 
14555b 
000042 



033352 



TYPOS 

.BYTE 

.BYTE 

TYPE 

CLR 

SGET42: MOV 
BEQ 
CLR 
MOV 



SERTTL, -'SP) 



5 

0 

.SCRLF 
SERTTL 
3I42.R0 
SDOAGN 

-(SP) 

•SCLR.T.-fSP) 



SAVE SERTTL FOP TYPEOUT 

TOTAL NUMBER OF ERRORS IN OCTAL 

GO TYPE—OCTAL ASCII 

TYPE 5 DIGITS 

SUPPRESS LEADING ZEROS 

TYPE CARRIAGE RETURN, LINE FEED 

CLEAR ERROR TOTAL 

GET MONITOR ADDRESS 

BRANCH IF NO MONITOR 

INSURE THE "T" BIT IS CLEAR 

SETUP FOR AN RTI OR RTT 



"Hl1DE:-:.-jF r PB-A PDF :: 

0FFPBA.P1I Cl-NC\-"fe 21:Cb 

7047 C33350 00042b 
7048 

7049 0333S2 

'050 033352 013700 000CM2 
" 14C 



L10 
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END OF PflSE ROUTINE 



7053 

7054 

7055 

TOSfc 

7057 

7058 

7058 

7063 

70b i 

70b2 

7063 

70fc4 

70fc5 

7066 

7067 

7068 

7069 

7070 

7071 

7072 

7C73 

7074 

7075 

707b 

7077 

7078 

707=3 

7080 

7081 

7082 

7083 

7084 

708S 

7086 

7087 

7088 

7089 

7090 

7091 

7092 

7093 

7094 

7095 

70% 

7097 

7098 

7099 

710C 

7101 

7102 



333362 

■>4 



033370 
033372 
033372 
031374 
033400 
033406 
0334 1C 
033414 
033416 
032422 
033426 



033430 
C33430 
033432 
033434 
033436 



033442 
033442 
0334^4 
033452 



004710 

00C240 

104400 
04271b 
032777 
001005 
0051b7 
100402 
05271b 
0127-b 
000002 



000137 
005034 
000000 
377 
033442 



000020 
010000 

000020 

000020 
033430 



145532 



377 



:oo 



104406 

032777 040000 1454bb 
001114 



033454 00041b 

033456 013746 000004 

033462 012737 033502 000004 

033M70 005737 177060 

033474 012637 000004 

033500 000463 

033502 022626 



JCLR.T: 



SENDAD: 



SDOAGN: 



IS: 

SRTRN: 



SLOOP: 



BR 



nov 

HI SET 

JSR 

NOP 

NOP 

NOP 

TRAP 

BIC 

BIT 

BNE 

COM 

BMI 

BIS 

nov 

RTI 



SRTNAD: 
JTBIT: 
SENULL : .B V TE 
.EVEN 



JflP 
.UORD 
.WORD 



SRTRN 



3142. RO 
SDOAGN 

PC.iROJ 



•20. (SP) 

•BIT12.3SWR 

IS 

STBIT 
IS 

•20. (SP) 
•SLOOP, -(SP) 



S(PO + 

LOOP 

0 

-1.-1,0 
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;;GC DC AN RTI OR RTT TO LOAD 
;;WITH A CLEARED "T" BIT 



'HE PSw 



INSURE RQ CQNTPINS THE MONITORS 

RETURN ADDRESS 

CLEAR THE WORLD 

GO TO MONITOR 

SAVE ROOM 

FOR 

ACT 11 

PUSH OLD PSU AND PC ON STACK 
CLEAR THE "T" BIT 
RUN UITH TRACE TRAP 7 
BR IF NO 

IS IT TIME FOR TRACE TRAP 

BR IF NO 

SET TRACE TRAP 

JUMP TO START OF TEST 

RETURN—THIS IS CHANGED TO 

AN "RTT- IF "RTT- IS A LEGAL 

INSTRUCTION 



;; RETURN 

j;"T" BIT STATE INDICATOR 
;;NULL CHARACTER STRING 



.SBTTL SCOPE HANDLER ROUTINE 

4THIS ROUTINE CONTROLS THE LOOPING OF SUBTESTS. IT WILL INCREMENT 

♦AND LOAD THE TEST NUMBER iSTSTNM) INTO THE DISPLAY REG. i'DISPLAY<7:0> ) 

*AND LOAD THE ERROR FLAG (SERFLG) INTO DISPLAY<15:08> 

*THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 

#SW14=1 LOOP ON TEST 

*SW11=1 INHIBIT ITERATIONS 

*SW09=1 LOOP ON ERROR 

*SW08=1 LOOP ON TEST IN SWR<7:0> 

*CALL 

* SCOPE ;;SCOPE=IOT 



SSCOPE: 

CKSWR 

IS: BIT »BIT14,3SWR 

BNE SOVER 
:ltt«tSTART OF CODE FOR THE XOR 
SXTSTR: BP bS 



SS: 



MOV 

MOV 

TST 

MOV 

BR 

CMP 



StERRVEC.-(SP) 

MSS.atERRVEC 

3il770b0 

(SP)+.3tERRVEC 

SSVLA6 

(SP)+,(SP)+ 



;TEST FOR CHANGE IN SOFT-SWR 
LOOP ON PRESENT TEST' 
.;YES IF SW14=1 
TESTERtlttt 

IF RUNNING ON THE "XOR" TESTER CHANGE 
THIS INSTRUCTION TO A "NOP" (NOP=240) 
SAVE THE CONTENTS Of THE ERROR VECTOR 
SET FOR TIMEOUT 
TIME OUT ON XOR' 
RESTORE THE ERROR VECTOR 
GO TO THE NEXT TEST 
CLEAR THE STACK AFTER A TIME OUT 




033530 
033532 
033536 
033S40 
033546 
033550 
033556 
033560 
033566 
033570 
574 



033602 
033610 
033612 
03361b 
033620 
033624 



1fiIN0EC-ll-0f«B-h 
DFFP9fi.Pl! M-NOv 



7103 

7104 

7105 

7106 

7107 

7108 

7109 

7110 

7111 

7113 

7113 

7114 

7115 

711b 

7117 

7119 

7119 

7120 

7121 

7122 

7123 

7124 

7125 

7126 

7127 

7128 

7129 

7130 

7131 

7132 

7133 

7134 

7135 

7136 

7137 

7138 

7139 

7140 

7141 

7142 

7143 

7144 

7145 

■^b 

7147 

7148 

7149 

7150 

7151 

7152 

7153 

7154 

7155 

715b 

7157 

715S 



o: 

033642 
033650 
033654 
033662 
033666 
033672 
033676 
033704 
033712 
03371b 
033720 



MiO 
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2i:Cb SCC°E hANDLEfi ROUTINE 

(SP)+.atERRVEC 
7S 

COOE FOR THE XOR 

•BiToe.aswR 

3SUR. STSTNM 
SOVER 
SERFLG 
3S 

SERMAX. SERFLG 
35 

•BIT09,35UR 
4S 

SLPERR.SLPADR 
SOVER 
JERFLG 
STIMES 
IS 

•BIT11.3SWR 
IS 

SPflSS 
IS 

SICNT 

STIMES, SICNT 
SOVER 
•1, SICNT 
SMXCNT, STIMES • 
STSTNM 

STSTNM. STESTN 
(SPJ.SLPADR 
(SP).SL?ERR 

sescrpe 

•1JERMAX 
STSTNM, aOISPLflY 
SLPA0R,(5P) 



.5BTTL ERROR HANDLER ROUTINE 



012637 


000004 






MOV 


000423 








BR 








bS: ; ttlllEND 


032777 


000400 


145420 




BIT 


001404 








BEG 


1277b7 


145412 


145352 




CMPB 


0014b5 








BEQ 


I057b7 


145345 




2S: 


TSTB 


001421 








BEG 


126757 


145351 


145335 




CMPB 


101015 








BHI 


032777 


001000 


145352 




BIT 


001404 








BEQ 


01b7b7 


145324 


145320 


7S: 


MOV 


0004% 








BR 


105067 


145307 




4S: 


CLRB 


000415 


145502 






CLR 
BR 


032777 


004000 


145330 


3S: 


BIT 


001011 








BNE 


005767 


14550b 






TST 


001406 








BEG 


005267 


145250 






INC 


026767 
00202M 


145452 


145252 




CMP 
BGE 


012767 


000001 


145242 


IS: 


MOV 


01 57b7 


000052 


145432 




MOV 


105267 


145226 




SSVLAD: 


INCB 


Iik7b7 


145222 


145440 




MOVB 


011bb7 


145220 






MOV 


011667 


145216 






MOV 


005067 


145406 






CLR 


112757 


000001 


145211 




MOVB 


01b777 


145172 


145230 


SOVER: 


MOV 


01b71b 


145170 






MOV 


000002 








RTI 


000001 






SMXCNT: 


1 
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; RESTORE THE ERROR .'ECTOR 
:LOOP ON THE PRESENT TEST 
lESTERllttl 

LOOP ON SPEC. TEST' 

BR IF NO 

ON THE RIGHT TEST' SUR'7:0> 
BR IF YES 

HAS AN ERROR OCCURRED 7 
BR IF NO 

MAX. ERRORS FOR THIS TEST OCC^RREC 

BR IF NO 

LOOP ON ERROR 7 

BR T F NO 

SET LOOP ADDRESS TO LAST SCOPE 
ZERO THE ERROR FLAG 

CLEAR THE NUMBER OF ITERATIONS T 0 MAKE 
ESCAPE TO THE NEXT TEST 
INHIBIT ITERATIONS' 
BR IF YES 

IF FIRST PASS OF PROGRAM 
INHIBIT ITERATIONS 
INCREMENT ITERATION COUNT 
CHECK THE NUMRER OF ITERATIONS MADE 
BR IF MORE ITERATION REQUIRED 
REINITIALIZE THE ITERATION COUNTER 
SET NUMBER OF ITERATIONS TO DC 
COUNT TEST NUMBERS 
SET TEST NUMBER IN APT MAILBOX 
SAVE SCOPE LOOP AOORESS 
SAVE ERROR LOOP AOORESS 
CLEAR THE ESCAPE FROM ERROR ADDRESS 
ONLY ALLOW ONE(l) ERROR ON NEXT t E5 ~ 
DISPLAY TEST NUMBER 
FUDGE RETURN AOORESS 
FIXES PS 

MAX. NUMBER OF ITERATIONS 



4THIS ROUTINE WILL INCREMENT THE ERROR FLAG AND THE ERROR COUNT, 
tSAVE THE ERROR ITEM NUMBER AMD THE ADDRESS OF THE ERROR CALL 
ft AND GO TO ERTYPE ON ERROR 

«THE SWITCH OPTIONS PROVIDED BY THIS ROUTINE ARE: 



*SW15=1 
#SW13=1 
*SW10=1 
«SW09=1 
*CALL 

* ERROR 



033722 

033722 10440b 

033724 105257 

033730 001775 



145153 



SERROR: 
7S: 



CKSWR 

INCB 

BEQ 



HALT ON ERROR 
INHIBIT ERROR TYPEOUTS 
BELL ON ERROR 
LOOP ON ERROR 

N ; ; ERROR^EMT AND N=ERROR ITEM NUMBER 

; ; TEST FOR CHANGE IN SOFT-SUR 
SERFLG ;SET THE ERROR FLAG 

7S ; ; DON'T LET THE FLAG GO TO ZERO 



1AINDEC-11-DFFPB-A 



DFFPB3.PI1 
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ERROR HANDLER ROUTINE 



7159 

71B0 

7161 

7162 

7163 

7164 

7165 

7166 

7167 

7169 

7169 

7170 

7171 

7172 

7173 

717M 

7175 

7176 

7177 

7178 

7179 

718C 

71B1 

7182 

7183 

718M 

718S 

7186 

7187 

7188 

7189 

7190 

7191 

7192 

7193 

7194 

7195 

71% 

7197 

7198 

7199 

7200 

7201 

7202 

7203 

7204 

720S 

7206 

7207 

7208 

7209 

7210 

7211 

7212 

7213 

7214 



033732 
033740 
033746 
0337S0 
033754 
033760 
033764 
033772 
034000 
034006 
034010 
034014 
034020 
034020 
034026 
034030 
034036 
034042 
034043 
034044 
034046 
034052 
034054 
034056 
034060 
034066 
034070 
034074 
034100 
034102 
034106 
034106 
034114 
U34116 
034120 
034120 
034126 
034130 
034134 
034 t 42 
034150 
034152 
034156 



016777 
032777 
001402 
104401 
005267 
011667 
162767 
117767 
032777 
001004 
004767 
104401 

122767 
001007 
116767 
004767 
000 
000 
000777 
005777 
100002 
000000 
104406 
032777 
001402 
016716 
005767 
001402 
016716 

022737 
001001 
000000 

032777 
001013 
011637 
062737 
122777 
001002 
062716 
000002 



145144 
002000 

001306 
145132 
145132 
000002 
145120 
020000 

002124 
001313 

000001 

145060 
000740 



145066 



145014 
145204 

145176 

033362 



001162 
177776 
000377 

000002 



145202 
145172 



145124 
145114 
145132 



145310 
000004 



000042 



001000 145012 



001162 
145012 



IS: 



205: 



215: 

225: 
25: 



001000 145052 3$: 



4$: 



55: 



65: 



MOV 

BIT 

BEQ 

TYPE 

INC 

MOV 

SUB 

MOVB 

BIT 

BNE 

JSR 

TYPE 

CMPB 

BNE 

MOVB 

JSR 

.BYTE 

.BYTE 

BR 

TST 

BPL 

HALT 

CKSWR 

BIT 

BEQ 

MOV 

TST 

BEQ 

MOV 

CMP 
BNE 
HALT 



BIT 
BNE 
MOV 
ADD 
CMPB 
BNE 
ADD 

ERM10: RTI 



STSTNM, 3DISPLAY 

•BIT10,3SWR 

IS 

.SBELL 

SERTTL 

(SP).SERRPC 

I2.SERRPC 

3SERRPC.SITEMB 

IBIT13.3SWR 

205 

PC.ERTYPE 
.SCRLF 

•APTENV,SENV 
25 

SITEMB.21S 

PC.SATY4 

0 

0 

225 

asuR 

35 



•BIT09.3SWR 
45 

SLPERR.(SP) 

SESCAPE 

55 

SESCAPE, (SP) 

•SENDAD.3I42 
65 



IBIT09.3SWR 
ERM10 

(SP).3«SREG0 

•-2,3tSREG0 

•377.3SREG0 

ERNlu 

•2,(SP) 



DISPLAY TEST NUMBER AND ERROR FLAG 
BELL ON ERROR' 
NO - SKIP 
RING BELL 

COUNT THE NUMBER OF ERRORS 

GET ADDRESS OF ERROR INSTRUCTION 

STRIP AND SAVE THE ERROR ITEM CODE 

SKIP TYPEOUT IF SET 

SKIP TYPEOUTS 

GO TO USER ERROR ROUTINE 



; RUNNING IN APT MODE 
NO. SKIP APT ERROR REPORT 
:SET ITEM NUMBER AS ERROR NUMBER 
; REPORT FATAL ERROR TO APT 



APT ERROR LOOP 

HALT ON ERROR 

SKIP IF CONTINUE 

HALT ON ERROR! 

TEST FOR CHANGE IN SOFT-SWR 

LOOP ON ERROR SWITCH SET' 

BR IF NO 

FUDGE RETURN FOR LOOPING 
CHECK FOR AN ESCAPE ADDRESS 
BR IF NONE 

FUDGE RETURN ADDRESS FOR ESCAPE 

ACT-11 AUTO-ACCEPT' 

BRANCH IF NO 

YES 



;SEE IF ERROR 1377 



. SBTTL SAVE AND RESTORE R0-R5 ROUTINES 

• ########*##**##**####**##************************************** 

4SAVE RO-RS 

*CALL: 

* SAVREG 

*UPON RETURN FROM SSAVREG THE STACK WILL LOOK LIKE: 

*TOP — (+16) 

* +2 — (+1B) 

* +4 — R5 



Bll 



'215 
~2lb 
'21? 
7219 
7219 
~22C 
^221 



7223 
7224 
722S 
'22b 
'227 
7228 
7 229 
7230 
7221 
7232 
7233 
~234 
7235 



7236 
723S 
7240 
72M1 
7242 
7243 
7244 
72% 
72% 
72M7 
7248 
7249 

7250 
7251 
7252 
7253 
725-4 
7255 
72Sb 
7257 
7258 
7259 
72SC 
72ti 
72fc2 
72fc3 
72fe4 
72b5 
72fcfc 
72fc7 
72b8 
72feS 
727C 



03MlbO 
034ibC 
03sib2 
C341b4 
03M166 
C3M17C 
034172 
034174 
03M2X 
034204 
034210 
034214 



03421b 
03421b 
03M222 
03422b 
03M232 
03423b 
034240 
034242 
034244 
03424b 
034250 
034252 



034254 
0342b0 
0342b2 
0342fc4 



-s:.--fc 
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SAVE AND RESTORE K0-R5 ROUTINES 



t «b — R4 
* ♦S — R3 
#♦10 — R2 
•♦12 — Rl 
#♦14 — 90 
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0131% 
0102% 
0102% 

0104% 

0105% 

0lfeb% 000022 

0lbb% 300022 

0lbb% 000022 

0lbb% 000022 
000002 



0l2bbb 000022 

Cl2bbb 000022 

012bbb 000022 

012bbb 000022 

012b05 

012b04 

012b03 

012bO2 

0l2b01 

012bOC 

000022 



10S7b7 14%77 
100002 
000000 
0004X 



SSAVREG: 

MOV 
flOV 
MOV 
MOV 

nov 
nov 
nov 
nov 
nov 
nov 

RTI 

;*RESTORE R0-R5 
;#CALL: 

:# RESREG 
SRESREG: 

nov 
nov 
nov 
nov 
nov 
nov 
nov 
nov 
nov 
nov 

RTI 



RO.-CSP) 

Rl.-(SP) 

R2,-(SP) 

R3,-(SP) 

R4,-(SP) 

R5 -(SP) 

22lSP),-(SP) 

22(SP),-(SP) 

22(SP),-(SP) 

22(SP).-(SP) 



PUSH RO 
PUSH Rl 
PUSH R2 
PUSH R3 
PUSH R4 
PUSH RS 
SAVE P3 
SAVE PC 
SAVE PS 
SAVE PC 



ON STACK 
ON STACK 
ON STACK 
ON STACK 
ON STACK 
ON STACK 
Cf nAIN FLOW 
OF nAIN FlCU 
OF CALL 
Of CALL 



vSP)* 

(SP)* 
(SP)* 
(SP)* 
(SP)* 
(SP)* 
(SP)* 
(SP)* 
(SP)* 
iSP)* 



,22(SP) 
,22(SP) 
,22(SP) 
,22(SP) 

RS 
,R4 
,R3 

R2 
.Rl 
,R0 



RESTORE PC OF CALL 
RESTORE PS OF CALL 
RESTORE PC OF NAIN FLOW 
RESTORE PS OF nAIN FLOU 
POP STACK INTO RS 
POP STACK INTO R4 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO Rl 
POP STACK INTO RO 



SBTTL TYPE ROUTINE 



;###*##*######«#**##*####•*#*#**##*♦*##***##**#**»***********##♦ 

•ROUTINE TO TYPE ASCI2 MESSAGE. f€SSAG£ flUST TERN I NATE UITH A 0 BYTE 
#THE ROUTINE UILL INSERT A NUMBER OT NULL CHARACTERS AFTER « LINE FEED. 



#N0TE1 
#N0TE2 
#N0TE3 
t 

-CALL: 

#1) USING ft 

# TYPE 
#0R 

# TYPE 

# nESAOR 
« 



SNULL CONTAINS THE CHARACTER TO BE USED AS THE FILLER CHARACTER. 
FILLS CONTAINS THE . VMBER OF FILLER CHARACTERS REQUIRED. 
"LLC CONTAINS THE C1W..YTER TO FILL A^TER. 



IF II 
IF It 



STYPE: 



TSTB 
BPL 
HALT 
BR 



TRAP INSTRUCTION 
, MESADR 



ITPFLG 
IS 



3$ 



;;MESAOR IS FIRST AOORESS OF AN ASCIZ STRING 



IS THERE A TERMINAL' 
BR IF YES 

HALT HERE IF NO TERMINAL 
LEAVE 



-0"PB-m 



*b 2i.3b 



T^E ROUTINE 



Cll 

iDOb. 



~2~2 
""2"*2 
"2~4 
^2~S 

I|2 

7278 

^ * * 

"28C 
7281 
~282 
7283 
"284 
"285 
~29b 
728"/ 
7288 
7288 
7280 
7281 
7285 
7283 
7284 
7285 
72% 
7287 
7288 
7288 
7300 
7301 
7302 
7303 
7304 
7305 
7306 
7307 
730e 
7308 
7210 
7311 
7312 
7313 
7314 
7315 
731b 
7317 
7318 
7319 
7320 
7321 
7322 
7323 
732M 
7325 
7326 



334266 
03S27C 
034274 
234302 
034304 
C3H312 
034314 
034320 
034 324 
034326 
034334 
C34336 
C3M3H0 
034342 
034344 
0343% 
034352 
034354 
034360 
034362 
034366 
034370 
034372 
034374 
034376 
034402 
034404 
034410 
034414 
03441b 

034*422 
034426 
034430 
03HM3M 
034440 



C i OCHfc 

:rt>03 

I227&7 

X1C11 
132767 

001*05 
010067 
0OM7B7 

000000 
I327fe7 
0G1003 
.120% 
OOldOS 
00572b 
Cl2bO0 
0b27lb 
000002 
l??7lb 
001430 
12271b 
001006 
00572b 
104401 
001313 
105087 
000755 
004767 
126726 
001350 
01b746 

105366 
002770 
004767 
10536' 
000770 



115025 



30CC02 
003CC1 

00C1X 

000004 
0004% 



00C3HC 145003 



000002 
00001! 
00020C 

000130 

000056 
144542 

144532 

000001 

000032 
000072 



IS: 



bi$: 
b2S: 

2S: 



3$: 
4$: 



51: 
bS: 



*0V 

criPB 

BNE 

9ITB 

3EC 

MOV 

JSR 

.UORD 

BI T B 

BNE 

novB 

BNE 

TST 
NOV 
ADD 
RTI 

cure 

BEQ 

cnpb 

BNE 

TST 

TYPE 

ICRLF 

CLR8 

BR 

JSR 

CNPB 

BNE 

NOV 

DECB 

BLT 

JSR 

DECB 

BR 



RC.-iSP) 
a2lSP),RC 
•APTENV.SENV 
b2S 

•APTSPOOL.SENVN 
b2S 

RO.bli 
PC, SAT .3 

0 

•APTCSUP.IENvn 
bOS 

(ROl*,-(SP) 
4$ 

(SP)* 
(SPH.RO 
12, (SP) 

•HT,(SP) 
8$ 

•CRLF.iSP) 
5S 

(SP)* 



SCHARCNT 
21 

PC.STYPEC 
SFtLLC,(5PH 

2S 

INULL.-(SP) 

KSP) 
6S 

PC.STYPEC 

SCHARCNT 

7S 



034442 


11271b 


000040 




8S: 


NOVB 


0344% 


004767 


000014 




8$: 


JSR 


034452 


132767 


000007 


000052 




BITB 


034%fl 


001372 








BNE 


034462 


005726 








TST 


034%4 


000724 








BR 


034466 


105777 


144456 




STYPEC: 


TSTB 


034472 


100375 








BPL 


034474 


116677 


000002 


144450 




NOVB 


034502 


122766 


000015 


000002 




CNPB 


C34510 


001003 








BNE 


034512 


105067 


000014 






CLRB 


034516 


000406 








BR 


034520 


122766 


000012 


000002 


If: 


CNPB 


034526 


00140c 
105227 








BEQ 
INCB 




000000 






SCHARCNT : . UORD 



; HORIZONTAL TAB PROCESSOR 

.(SP) 
PC.STYPEC 
•7, SCHARCNT 
9S 

(SP)* 
2S 

a$TPs 

STYPEC 
2(SP).3STPB 
•CR,2!SP) 
IS 

SCWARCNT 
STYPEX 
•LF.2(SP) 
STrfEX 

(PCj* 
0 
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SAVE RO 

GET ADDRESS OF fiSCIZ S T RI4G 

RUNNING II APT NODE 

NO. GO CHECK FOR APT CONSOLE 

SPOOL NESSAGE T 0 APT 

NO.GO CHECK FOR CONSOLE 

SEtuP NESSAGf ADDRESS FOR AP" 

SPOOL NESSAGE TC APT 

MESSAGE ADDRESS 

APT CONSOLE SUPPRESSED 

YES.SKIP TYPE OUT 

PUSH CHARACTER TO BE TYPED ONTC Vi 

BR IF IT ISN'T THE TERf1INA T Cfl 

IF TERMINATOR POP IT OFF THE STACK 

RESTORE RO 

ADJUST RETURN PC 

RETURN 

BRANCH IF <HT> 



; ; BRANCH IF NOT < CRLF 5 

;;POP <CR><LF> EQLIV 
; ; TYPE A CR ANO LF 



CLEAR CHARACTER COUNT 

GET NEXT CHARACTER 

GO TYPE THIS CHARACTER 

IS IT TINE FOR FILLER CHAPS. ' 

IF NO GO GET NEXT CHAR. 

GET I OF FILLER CHARS. NEEDED 

AND THE NULL CHAR. 

DOES A NULL NEED TO BE TYPED' 

BR IF NO— GO POP THE NULL OFF OF VK* 

GO TYPE A NULL 

DO NOT COUNT AS A COUNT 

LOOP 



REPLACE TAB WITH SPACE 
TYPE A SPACE 
BRANCH IF NOT AT 
TAB STOP 

POP SPACE OFF STACK 

GET NEXT CHARACTER 

UAIT UNTIL PRINTER IS READY 

LOAD CHAR TO BE TYPED INTO DATA REG. 
IS CHARACTER A CARRIAGE RETURN" 1 
BRANCH IF NO 

YES—CLEAR CHARACTER COUNT 
EXIT 

IS CHARACTER A LINE FEED* 
BRANCH IF YES 
COUNT THE CHARACTER 
CHARACTER COUNT STORAGE 



•v-:s:€.-.. 



Dll 



cc 



v. ~t £. :& 



fPC DIAGNOSTIC PART 2 MACY11 27(1006) 
TYPE ROUTINE 
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'329 
733C 
'331 
'332 
'333 
'334 
'335 
'33b 
'337 
7336 
7339 

■ 

'>: 
'>= 

7343 
7>4 
'3% 
'3-* 
7>- 
7348 
73MS 
7350 
73S1 
73S2 
7353 
7354 
7355 
7356 
7357 
7358 
7359 
7360 
7361 
7362 
7363 
7364 
7365 
7366 
7367 
7368 
"3b9 
7370 
7371 
7372 
7373 
737M 
7375 
737b 
7377 
7378 
737S 
738C 
7381 
T 3e2 



03H536 
034542 
034550 
034554 
03H560 
03H562 
034570 
03457b 
034604 
03460b 
03H610 
03% 12 
03%lb 
03M620 
03H62M 
03%30 
034634 
03%40 
03%42 
C3%44 
C3%% 
C3%50 
03%S2 
C3%54 
03%Sb 
03%60 
C3H66M 
034666 



$nPEX: RT5 



PC 



SBTTL BINARY TO OCTAL (ASCII) AND TfPE 



•THIS ROUTINE IS USEO TO CHANGE A 16-BIT BINARY NUMBER TO ft b-CUI 
•OCTAL (ASCII) NUMBER AND TYPE IT. 

•STYPOS — ENTER HERE TO SETUP SUPPRESS ZEROS AND NUMBER OF DIGITS 
•CALL: 

* MOV NUH.-(SP) 

* TYPOS 

* .BYTE N 

* .BYTE n 
# 
t 



'v5C 



NUMBER TO BE TYPED 
CALL FOR TYPEOUT 

N=l TO 6 FOR NUMBER OF DIGITS TO TYPE 

n=i or o 

;;1=TYPE LEADING ZEROS 
:;0=SUPPRESS LEADING ZEROS 

'0 TYPE CUT UITH THE SAME PARAMETERS AS T HE ..ms" 









;* 


MOV 








;• 


TYPOC 


3176% 


300000 




STYPOS: 


MOV 


116667 


000001 


000211 




M0V8 


1126b/ 


000207 






HOVB 


06271b 


000002 






AOO 


000406 








BR 


112767 


000001 


000171 


ITYPOC: 


MOVB 


112767 


000006 


000165 




HOVB 


H27b7 


OCCOOS 


00C1SM 


STYPON: 


MOVB 


0103Mb 








MOV 


0104% 








MOV 


0105% 








nov 


llb704 


000145 






MOVB 


005404 








NEG 


062704 


00000b 






ADD 


110%7 


000132 






MOVB 


llb704 


000125 






MCVB 


OlbbOS 


0O0C12 






MOV 


005003 








CLR 


006105 






IS: 


ROL 


000404 








BR 


006105 






2S: 


ROL 


006105 








ROL 


006105 








ROL 


010503 








MOV 


006103 






3S: 


ROL 


105367 


00007b 






OECB 


10001b 








BPL 


042703 


177770 






BIC 



•ITYPON ENTER HERE 

•STYPOS OR STVROC 
•CALL: 

• MOV NUM,->SP) 

• TYPON 

•STYPOC — ENTER HERE FOR TYPEOJT OF A 16 BIT NUMBER 
•CALL- 

NUM.-(SP) 



;; NUMBER TO BE TYPED 
;;CALL FOR TYPEOUT 



3(SP),-(SP) 

1(SP),S0FILL 

(SP)+.S0N0DE*1 

•2,(SP) 

STYPON 

•l.SOFILL 

•b,SOHOD€*l 

tS SOCNT 

R3,-(SP) 

R4,-(SP) 

RS.-(SP) 

S0M00€*l f R4 

R4 

tb,R4 

R4.S0M00E 

SOFILL.RH 

12(SP),RS 

R3 

R5 

3S 

RS 

PS 

R5 

R5.R3 
R3 

10M0DE 
7S 

•17777Q.R3 



;; NUMBER TO BE TYPED 
:;CALt FOR TYPEOUT 

; PICKUP THE .100E 
;L0AO ZERO FILL SWITCH 
; NUMBER OF DIGITS TO TYPE 
;A0JUST RETURN ADDRESS 

;SET THE ZERO FILL SWITCH 
;SET FOR SlX(b) DIGITS 
;SET THE ITERATION COUNT 
;SAVE R3 
SAVE R4 
:SAV£ P5 

:G£T THE NUMBER OF DIGITS TO T>P£ 



SUBTRACT IT FOR MAX. ALLOWED 

SAVE IT FOR USE 

GET THE ZERO FILL SWITCH 

PICKUP THE INPUT NUM8ER 

CLEAR THE OUTPUT WORD 

ROTATE MSB INTO "C" 

GO DO MSB 

FORM THIS DIGIT 



GET LSB OF THIS DIGIT 
TYPE THIS DIGIT" 
BR IF NO 
GET RID OF JUNk 



Ell 
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BINARY T 0 OCTAL i ASCI I) AND *YPE 







m 






03%74 






738S 


03% 76 


001403 






®m 




00006C 


'388 


034706 


052703 


00004C 


7?» 


33H712 
03M7I6 

5347R 


104401 
003347 


034756 


1:351 


000032 


73S3 


03S7X 


302402 




~3% 
73% 


03473M 


□Qsaps 

000744 




73% 


034736 


012605 




7397 


034740 


012604 




73% 


03S742 


012603 




73% 


034 7H4 


016666 


000002 


7HC0 
~4C1 


034752 


012616 




334754 


noooo? 




7432 


034756 


000 




7433 


034 757 


000 




7404 


034760 


ooc 




7405 


034761 


ooc 




7436 


334762 


ooocoo 




74C7 








r4oe 








7409 








7412 








-411 


03H76M 


112767 
112767 


000001 


7412 


034772 


000001 


7413 


035000 


000403 




7414 


035002 


112767 


000001 


7415 


035010 






741b 


035010 


0100% 




7417 


035012 


0101% 




7418 


035014 


105767 


000206 


7419 


035020 


001450 




7420 


035022 


122767 


000001 


7421 


035030 


001031 




7422 


035032 


132767 


JOG 100 


7423 


035040 


001425 




7424 


035042 


017600 


000004 


742S 


0350% 


062766 


000002 


7426 


035054 


005767 


144236 


7427 


035060 


001375 




7426 


035062 


010067 


144244 


7423 


035066 


105720 




7430 


035070 


001376 


144234 


7431 
7432 


mi 




7433 


035100 


010067 


144230 


743M 
7435 


035104 
035112 


mi 


000004 


7436 
7427 


035114 


017667 


000004 


035122 


062766 


000002 


7* 2S 


035130 


0167% 


142642 



4$: 
SS: 



BNE 
TST 
BEQ 



faS: 



8S: 

SOCNT: 



BIS 

m 

BLT 

INC 

BR 

NOV 

NOV 

NOV 

NOV 

NOV 

RTI 

.BYTE 

•8 YT 6 
.BYTE 



4J 
R4 
SS 

R4 

i'0.R3 
• * .R3 

V 

:nt 



6S 

R4 
2S 

(SPH.R5 
(SP)*,R4 
(SP)*,R3 
2(SP),4(SP) 
(SP)+ (SP) 



SOFILL: .BYTE 
SONODE: .WORD 



0 
0 



TEST FOR 0 
SUPPRESS THIS 
BR IF YES 
N'T SUPPRESS anyi;re :*s 
E THIS DIGIT ASCII 
HAKE ASCII IF NOT mLREACt 

SS 7 ? YK R THls X Bf CI T 
COUNT BY 1 
BR IF MORE TO DO 
BR IF DONE 

INSURE LAST DIGIT ISN'T ft B-m'* 
CO DO THE LAST DIGIT 
RESTORE RS 
RESTORE R4 
RESTORE R3 

SET THE STACK FOR RETURNING 
RETURN 

STORAGE FOR ASCII DIGI" 

TERMINATOR FOR TYPE ROLTINE 

OCTAL DIGIT COUNTER 

ZERO FILL SWITCH 

NUMBER OF DIGITS TO TYPE 



.SBTTL APT COMMUNICATIONS ROUTINE 

::#»######«###*#*#******#**#*#####*##*#**#*##*###*#***»*«******♦ 



SATYl 
SATY3: 

SATY4: 
SATYC: 



IS: 



2S: 



NOVB ll.SFFLG 

NOVB ll.SMFLG 

BR SATYC 

NOVB ll.SFFLG 

NOV RO.-CSP) 

NOV Rl.-(SP) 

'STB SHFLG 

BEQ SS 

CMPB iAPTENV.SENV 

BNE 3S 

BITB tAPTSPOOL.SENVN 

BEQ 3S 

NOV 34(SP).R0 

AOD 12.4(SP) 

TST SMSGTYPE 

BNE IS 

MOV RO.SMSGAD 

TSTB (ROH 

BNE 2S 

SUjj jjHSGAD,RO 

NOV RO.SMSGLGT 

MOV 14, SMSGTYPE 

BR SS 

MOV 34(SP).4S 

ADD i2.4(SP) 

MOV 177776, -(SP) 



;;T0 REPORT FATAL ERROR 
;;T0 TYPE A MESSAGE 

;;T0 ONLY REPORT FATAL ERROR 



PUSH RO ON STACK 
PUSH Rl ON STACK 
SHOULD TYPE A MESSAGE 7 
IF NOT: BR 
OPERATING UNDER APT* 
IF NOT: BR 

SHOULD SPOOL MESSAGES " 

IF NOT: BR 

GET MESSAGE AOOR. 

;:BUMP RETURN AOOR. 
;SEE IF DONE U/ LAST XMISSIOV 
;IF NOT: UAIT 

PUT AOOR IN MAILBOX 
IFIND END OF MESSAGE 

SUB START OF MESSAGE 
GET MESSAGE LNG*H IN WORDS 
PUT LENGTH IN MAILBOX 
TELL APT TO TAKE MSG. 



;:PUT MSG AOOR IN JSR LINkAGE 
: :BUMP RETURN ADDRESS 
;: PUSH 177776 ON STACK 



Fli 



"sindec-h-offps-a pop :: 3-* fp» diagnostic par* 2 macyh 27iioo&) oi-nov-?6 21:12 page :3s 

O^PBm.PII 01-NO;-7b 2i:3b APT COMMUNICATIONS ROUTINE 



7439 

7441 
7-442 
"*443 

"*444 

"*4% 
74% 
*-»47 
""448 
~-»*9 
"N5C 
^4Si 
"452 
"453 
7454 
-455 



"458 

7450 

746C 
7%1 
7%2 
74fc3 
7%4 
7%5 
7466 
7%7 
*468 
74fe<? 

747C 
7471 
7472 
74'3 
7474 
7475 
74 76 
7477 
7478 
747? 
7480 
7481 
7482 
7483 
7484 

7485 
7118b 

7487 
7488 
7489 
7490 
7491 
7*92 
74^3 

749* 



C3S134 
035140 
035142 
Q3S142 

035154 
035156 
035162 
03Slb4 
035172 
035200 
C3S204 
03S210 

035222 



035227 
03S23C 



035232 
03S2H0 
035242 
0352% 
035250 
03S254 
03S2bO 
035254 
0352bb 
035274 

03527b 
035302 
03530b 
2353 .'2 
035314 
035320 
035322 
035324 



004757 177114 
OOOOOO 

105757 0000b2 



14*162 

X1413 

00S7b7 144134 
001375 

017567 000004 144126 

062756 000002 000004 

005267 144112 

105057 00002C 

105067 00X13 

105057 000006 
012601 
01260C 



000 
300 
025232 
00020C 
0000C1 
XC'X 
X004C 



022767 
X1074 
105777 
100071 
1177% 
042716 
022726 
001062 
126727 
001456 

104401 
104401 
0167% 
104402 
104401 
005046 
0050% 
105777 



X0176 143730 
143676 

143672 
1776X 
000X7 

143642 000001 



035641 
035646 
142664 

035657 



41: 
5$: 
10$: 



JSP, PC.ITYPE 
.WORD 0 



TSTB 
SCO 

TST 
BEG 
TST 
BNE 
MOV 
ADD 
INC 
CLRB 
CLRB 
C^RB 
NOV 
NOV 
RTS 
.BYTE 
.BYTE 
.BYTE 
.EVEN 
APTSIZE=200 
APTENVsXl 
APTSP00L=1X 
A°TCSUP=040 



. SBTTL TTY INPUT ROUTINE 



111: 



12S: 



SMFLG: 
ILFLG: 
SFFLG: 



SFFli 
12S 
IENV 
12S 

INSGTYPE 
111 

34(SP).$FATAl 

•2.4(SP) 

INSGTYPE 

IFFLG 

SLFLG 

SNFLG 

»SP)*,R1 

iSP)+.RC 

PC 

0 

0 

0 



;;CALL TYPE N6CRC 



SHOULD REPORT FATAL ERPCP' 
IF NOT: BR 
RUNNING UNOER APT 1 
IF NOT: BR 

FINISHED LAST NESSAGE 1 
IF NOT: WAIT 
GET ERROR I 

::BUff RETURN AODP. 
TELL APT TO TAKE ERROR 
CLEAR FATAL FLAG 
CLEAR LOG FLAG 



CLEAR NESSAGE FLAG 
POP STACK INTO Rl 
POP STACK INTO RC 
RETURN 
MESSG. flag 
LOG FLAG 
.FATAL FLAG 



; •*#**###*#**##♦*«*****##****#*#*#*#♦«*##*#*#♦♦##**##»*#»#***♦**# 

.ENABL LS8 

;*SOFTUARE SWITCH REGISTER CHANGE ROUTINE. 
*ROUTINE IS ENTERED FRON THE TRAP HANDLER. AND UlLL 
;*SERVICE THE TEST FOR CHANGE IN SOFTWARE SWITCH REGISTER TRAP CAL. 
:#WHEN OPERATING IN TTY FLAG NOOE. 



1CKSUR: 



143614 



CMP 
BNE 
TSTB 
BPL 
NCVB 
BIC 
CNP 
BNE 
CNPB 
BEG 



TYPE 

SGTSUR: TYPE 
MOV 
TYPOC 
TYPE 

19$: CLR 
CLR 

71: TSTB 



•SWREG.SUR 
15S 
3STKS 
15$ 

aSTKB.-(SP) 
ItCi77, (SP) 
•7.(SPW 
15$ 

SAUTOB.ttl 
15$ 

, SCNTLG 
.$MSWR 

SUREC.-(SP) 

.SNNEU 

-(SP) 
-(SP) 
SSTKS 



IS THE SOFT-SWR SELECTED' 
BRANCH IF NO 
CHAR THERE 7 

IF NO. DON'T UAIT AROUND 

SAVE THE CHAR 

STRIP-OFF THE ASCII 

IS IT A CONTROL G> 

NO. RETURN TO USER 

ARE WE RUNNING IN AUTO-NODE* 

BRANCH IF YES 

ECHO THE CONTROL -G (tG) 

TYPE CURRENT CONTENTS 

SAVE SWREG FOR TYPEOUT 

GO TYPE— OCTAL ASCII (ALL DIGITS) 

PRONPT FOR NEU SWR 

CLEAR COUNTER 

T H£ NEU SUR 

CHAR THERE' 



Gil 

:-0frpB-M pop :: 3-* «p diagnostic par t 2 mac f i i 2"\i00b 

DFPPW.Pll Ci-NOV-76 21:06 TTY INPUT ROUTINE 



7M9S 
74% 
7M97 
7M96 
74<W 
7500 
"501 



*536 

7537 
7508 
7S09 

' » * — ' 

7511 
"512 
^513 
7514 
"515 
^515 
7517 
7S1B 
7519 
7520 
7521 
7522 
7523 
752*4 
7525 
7526 
7527 



7530 
7531 
7532 
7533 
753M 
7535 
7536 
7537 
7538 
7S3S 
7540 
7541 
7542 
75.43 
7E4H 
7545 
75% 
7547 
7548 
7549 

755: 



035330 1C0375 

035332 1177% 
03533b 04271b 



035342 
0353% 




035382 
035366 
035370 
035374 
035376 
035404 
035410 
035414 
035422 
035424 
035432 
03543M 
035440 
035444 
0354% 
035452 
035454 
03S460 
035%4 

8£M 

035472 
035474 
03S5O0 
03S50M 
035506 
0355 12 



001005 

000757 



021627 
001022 
005766 
001403 
016677 
062706 
104401 
125727 
001003 
012777 
000002 
004767 
021627 
002420 
021627 
003015 
042726 
005766 
001403 
006315 
006315 
006316 
005266 
056515 
000707 
104401 
000720 



035514 011546 
035530 100375 



143610 
1776QC 



000025 



000015 
000004 

000002 143534 

000006 

001313 

143515 COOOQi 

OOOJOO 143512 

177026 
000060 

000067 

000050 
000002 



000002 
177775 

001312 



<JS: 
201: 

ICS: 



11$: 
141: 



151: 
15$: 



17$: 



18S: 



.DSABL 



BPL 

MOVB 
BIC 



:ip 

BNE 
TYPE 
ADD 
BR 



CMF 
BNE 
T5T 
BEQ 

ncv 

ADD 

TYPE 

CMPB 

BNE 

MOV 

RTI 

JSR 

CMP 

BLT 

CMP 

BCT 

BIC 

TST 

BEQ 

% 

A5L 



m 

BR 
TYPE 
BR 
L5B 



5$TKB.-(SP. 
»tCi7^. SP 



(SP1.I25 
10S 

.5CNTLU 

fcb.S p 

i<3$ 



iSPJ.HS 
15S 
4(SP) 
US 

2(SP).aSWR 

•b.SP 

.SCRLF 

SINTAG.Ii 

15S 

•100,3STKS 

pc.stype: 

(SP).tbO 
18S 

(SP3.I57 
18S 

•60. v'SP)* 

2(5P) 

17$ 

C|P) 

(SP) 
2(SP5 

-2t5P),(SP) 
71 

.SQUES 
20S 



01-N0V-76 21:12 PACE 



;;IF NOT TRY AGAIN 



;:PICK UP 
; ; MAKE IT 



CHAR 
7-BIT 



ASCII 



is it a control-u' 
branch if not 
yes. echo cqntrol-u c?j 
ignore previous Input 
let's try it again 



IS IT A <CR>' 
BRANCH IF NO 

YES. IS IT THE FIRST CHAR'' 

BRANCH IF YES 

SAVE NEW SWR 

CLEAR UP STACK 

ECHO <CR> AND <LF> 

RE -ENABLE TTY KBC IN T ERRJP'S 1 

BRANCH IF NOT 

RE -ENABLE TTY KBO IN T ERRUPTS 

RETURN 

ECHO CHAR 

CHAR ( 0' 

BRANCH IF YES 

CHAR > T> 

8RANCH IF YES 

STRIP-OFF ASCII 

IS THIS THE FIRST CHAR 

BRANCH IF YES 

NO. SHIFT PRESENT 

CHAP OVER TO MAKE 

ROOM FOR NEW ONE. 
KEEP COUNT OF CHAR 
SET IN NEW CHAR 
GET THE NEXT ONE 
TYPE '<CR><LF> 
SIMULATE CONTROL-U 



; •#*#*♦##«###*#«######«###*#*#»****##**###*#*###«***#****##*♦**♦* 

;4THIS ROUTINE WILL INPUT A SINGlE CHARACTER FROM THE TTY 
;*CALL 



* 

;* 



RDCHR 
RETURN HERE 



000004 000002 
143414 



SRDCHP: MOV 
MOV 

IS: TSTB 
BPL 



(SP).-(SP) 
4(SP}.2iSP) 
3STKS 
IS 



INPUT A SINCLE CHARACTER FROM THE 
CHARACTER IS ON THE STACK 
WFH PARITY BIT STRIPPED 0*F 



PUSH DOWN THE PC 
SAVE THE PS 
WAIT FOR 
A CHARACTER 



Hll 



3-4 FPP DIAGNOSTIC PAP T 2 MACY11 27i lQObl 
TTY INPUT ROLTINE 



7552 
^53 

lis 4 

7556 
7557 
7558 
"559 
"SbO 
"5b i 
"Sb2 
"5b3 
">Sb4 
TSbS 
75bb 
75fc7 
"Sb8 
"569 
7570 
"571 
7572 
7573 
7574 
7575 
7576 
7577 
7578 
7579 
^580 
7581 
7582 
7583 
7584 
758S 
758b 
7587 
7588 
7589 
7590 
7591 
7592 
7593 
7594 
7595 
7596 
7597 
7598 
7599 
7bX 
7fc01 
7b02 
7bC3 
7bOH 

7b05 
7bDfe 



03Sb24 



03Sb41 
035b4b 
03SbS4 
C35b57 
03Sbb4 



035b70 
03Sb72 
035b 7b 
035700 
035702 
035704 
035710 



117-bb 
0s27bb 
Q2bb27 

m 

10C375 
1177% 
04271b 
022S27 

0013bb 
00075C 

002407 

003S03 

0H27bb 
000002 
052S3b 

13b 
30S015 
020075 

OHO 
036:440 



0100% 
OlbbOO 
005740 
111000 
008300 
ClbOOO 
000200 



035712 Cllb4fe 
035714 01 bbbb 
035722 000002 



1*3410 
177500 
00X04 

1433b2 



14335b 
177b00 
000021 



XX04 

000004 

000040 

005015 
00b507 
053523 
000 
047040 
000040 



0000C2 
035724 



c:ooc4 

000004 
20X23 



000140 

000175 

0XX4 

XC 
X0012 
020122 



000004 000002 



flCVB 
BIC 
CMP 
BNE 

2$: TSTB 
BPL 
10VB 
BIC 
CMP 
BNE 
BR 

3S: CMP 
BLT 
CMP 
BGT 
BIC 

4$: RTI 
SCNTLU: .ASCIZ 
SCNTLG: .ASCIZ 
SNSWR: .ASCIZ 



SSTKB.41SP) 
■tC<177;.4(SP) 
4(SP).i23 
3$ 

SSTK5 
2$ 

SSTKB.-(SP) 
•♦C177. (SP) 

(SP)*.fcai 

2$ 
IS 

4(SP),»140 
4S 

4(SP).I175 
4S 

•40.4(SP) 

/tU/<l5><12> 
'tG/<15><l2> 
<15><12>/SUR = 



21-N0V-7E> 21:12 PniE 



READ THE TTY 

GET RID OP JUNK IP ANY 

IS IT A CONTROL-S' 

BRANCH IP NO 

WAIT FOR A CHARACER 

LOOP UNTIL ITS THERE 

GET CHARACTER 

MAKE IT 7-BIT ASCII 

IS IT A CONTROLS 

IF NOT DISCARD IT 

YES. RESUME 

is It upper case' 

BRANCH IF YES 

IS IT A SPECIAL CHAR' 

BRANCH IP YES 

MAKE IT UPPER CASE 

GO BACK TC JSER 

CONTROL "U" 

CONTROL "G" 



053505 SHNEW: 



, ASCIZ / NEW = / 



.S8TTL TRAP DECODER 

ftTHIS ROUTINE WILL PICKUP THE LOWER BYTE OP THE "TRAP" INSTRUCTION 
* AND USE IT TO INDEX THROUGH THE TRAP TABLE POR THE STARTING AOCRE 
♦OP THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED IT WIL. 
*G0 TO THAT ROUTINE. 



STRAP: MOV 
MOV 
TST 
HOVB 
A Si 
MOV 
RTS 



,RQ.-(SP> 
2(SP),R0 
-(RO) 
(RQ),R0 
RO 

STRPAD(R01,R0 
RO 



SAVE RO 

GET TRAP ADDRESS 
BACKUP BY 2 

GET RIGHT BYTE OP TRAP 
POSITION POR INDEXING 
INDEX TO TABLE 
GO TO ROUTINE 



;;THIS IS USE TO HANDLE THE "GETPRI" MACRO 



STRAP2: MOV 
MOV 
RTI 



(SP).-(SPJ 
4(SP),2(SP) 



HOVE THE PC DOWN 
HOVE THE PSW DOWN 
RESTORE THE PSU 



.SBTTL TRAP TABLE 

:*THIS TABLE CONTAINS THE STARTING ADDRESSES OF THE ROUTINES CALlEO 
jftBY THE -TRAP" INSTRUCTION. 



035724 035712 
03572b 034254 



STRPAD: 



ROUTINE 

.WORD 
STYPE 



STRAP2 

; ;CALL=TYPE 



TRAP+i i 104401) TTY TYPE 01 T ROUTINE 



Ill 



•wince:-: :-DFrp8-A p df :: 

D*" r P9fl.Fi: 01-NCV--fc il-.Zh 



75OT 

21? 

7612 
7613 

31? 

761b 
7617 
'618 
761? 
7620 
7621 
7622 

^b2S 
7626 

762S 
76X 
7631 
7632 
7633 
763M 
7635 
7636 
7637 
7638 
763« 
7640 
7641 
7642 
7643 
7644 
7645 
7646 
7647 
7648 
7 64<3 
7650 
7651 
7652 
7653 
7654 
7655 
7656 
7657 
7658 
7659 
7660 
7661 
7662 



035734 
035736 
035740 

g% 

C35746 
035750 
035752 



03S754 
035762 



577c 
035774 
035776 
036000 
036002 
036004 
036010 
036014 
036022 
036024 



036026 
036034 
036OS0 
036044 
036050 
036052 
036056 
036060 
036062 
036064 
036066 
036070 
036072 
036100 
036106 
036110 
036112 
036114 
036116 
036124 
036130 
036132 



034576 
03S3C2 

035232 
sSlM 
1160 
034216 
0367 10 



012737 
012737 
Q1Q046 
0101% 
0102% 
010346 
0104% 
010546 
0177% 
010667 
012737 
000000 
000776 



012737 
016706 
005067 
005267 
001375 
012677 
012605 
012604 
012603 
012602 
012601 
012600 
012737 
012737 
104401 
037104 
012716 
004336 
042766 
005067 
000002 
000000 



34 ::agn:s*i: par t 2 

ITYPOC 
ST^POS 
STYPON 

SGTSWR 

SCKSWR 

IRDCHR 

SSAVREG 

IRESREG 

.RSET 

STEPf1=.-rfRPAD 



1ftC.ll 27 ,100b- 01-NCV-7b 21:12 PAGE .26 



CmLl=TYPOC 
CALL=TYPOS 
CALL=TYPON 

CALL=GTSWR 

CALL=CKSWR 
CALL=RDCHR 
CALL=SAVREG 
CALL=RESREG 
,,CALL=RSETUP 
:;CALL=LPERR 



TRAP+2; 104402) 
T RftP*3( 104403- 
TRAP*4( 104404, 



T YPE OCTAL NU M SER .£h:>, 

vpe octal nuibep (hz .E.i::**; :e 

TYPE OCTAL NLNBEP AS »EP ' 



TRAP+5( 104405) GE T SOFT-SWR SEEING 



TRAP+6( 10440b) 
TRAP+7( 104407) 
TRAP*10( 104410) 
TRAP+1 1(104411) 
TRA0+12( 104412) 
TRAP+13i 104413) 



TEST FOR CHANGE IN 
TTY TYPEIN CHARACTE 
SAVE R0-R5 ROUTINE 
RESTORE R0-R5 ROUTINE 



0F" r - 

■ PC. 



.*:ne 



ROUTINE TO INITIALIZE ftFTEP E;£C 
ROUTINE TO S£* LCCP ON EPPOP 



.SBTTL POUEP DOWN AND UP ROUTINES 



03b 132 
000340 



000024 
000026 



; POWER DOWN ROUTINE 



143130 
000122 
036026 



036132 
000076 
000072 
000066 

143062 



300024 



tPWRDN: NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
HALT 
BR 



•IlLLUP.aiPWRVEC 
•340,aiPWRVEC+2 

RO.-(SP) 

R1,-(SP) 

R2.-ISP) 

R3,-(SP) 

R4,-(SP) 

R5,-(SP) 

aSWR.-(SP) 

SP.I5AVR6 

■SPWRUP,3lPWRVEC 



PRIO 
PUSH RO 
PUSH Rl 
PUSH R2 
PUSH R3 



UP 

STACK 
STACK 
STACK 
STACK 

PUSH R4 ON STACK 
PUSH R5 ON STACK 
PUSH aSWR ON STAC/ 
SAVE SP 
;SET UP VECTOR 



FOR FAST 
7 

ON 
ON 
ON 
ON 



;;HANG UP 



000024 tPWRUP 



IS: 



; POWER UP ROUTINE 



035754 
000340 



000020 
175304 



000024 
000026 



000002 



SPWRNG: 
SPWRAD: 



IILLUP: 



NOV 
NOV 
CLR 
INC 
BNE 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
TYPE 
.WORD 
NOV 
.WORD 
BIC 
CLR 
RTI 
HALT 



■SILLUP.atPWRVEC 
JSAVR6 , SP 
SSAVR6 
SSAVR6 
IS 

CSP)+,aSWR 

(SP)+,R5 

(SP?+,R4 

(SPJ+.R3 

(SPH.R2 

iSPH.Rl 

(SPH.RO 

ispwr6n.sipwrvec 

•340.3IPWRVEC+2 

POWERN 
CPCH.(SP) 
START 
•20.2 (SP) 
JTBtT 



:SET FOR FAST DOWN 
GET SP 

WAIT LOOP FOR THE TTY 
WAIT FOR THE INC 
OF WORD 

POP STACK INTO 3SWR 
POP STACK INTO R5 
POP STACK INTO R4 
POP STACK INTO R3 
POP STACK INTO R2 
POP STACK INTO Rl 
POP STACK INTO RQ 
:SET UP THE POWER DOWN 
PRI0:7 

REPORT THE POWER FAILURE 

POWER FAIL NESSAGE POINTER 

RESTART AT START 

RESTART ADDRESS 

CLEAR T BIT 

CLEAR THE T BIT FLAG 

; THE POWER UP SEQUENCE WAS STARTED 



VECTOR 



Jll 



•WIN0EC-11-DFFPB-A 
DffPBfi.Pll QI-NCV- 



pnp 
*6 21.: 



7663 
7664 

7665 
1 666 
7667 
7668 
7669 
TfcTC 
-671 
7672 
7673 
7 0 7M 
7b7S 
7676 
7577 
7679 
7679 
7&80 
768! 

7682 
7b83 
7684 
7685 

» 

7688 

7b8S 
7690 
7691 
7692 
7693 
7694 
7695 
76% 
7697 
7698 
7699 
7700 
7701 
7702 
7703 
770M 
7705 
7706 
7707 
7736 
7^09 
7710 
7711 
7712 
7713 
7714 
7715 
77;b 
7717 
771£ 



C36134 
036136 



0361HC 
036142 
036144 
036165 
036160 
336166 

036170 
036174 
036200 

036202 
336206 
036210 




0362S0 
036254 
036256 
036260 
036262 
036264 

036266 
036272 
036274 
036276 
036300 
036302 

336304 
036306 

336210 



Q0077fe 
030000 



104401 
001313 
113737 
042737 
013737 
010046 

113700 
042700 
001005 

0137% 
104402 
000137 

022700 
001005 
016600 
011000 



006300 
006300 
006300 
062700 

012037 
001404 
104401 
OOOOOC 
104401 
001313 

012037 
00140* 
104401 
000000 
104401 
0C1313 

Q 10146 
010246 
210346 



2-t PP p DIAGNOSTIC PART 2 MAC ill 27c 1006 - 
POWER DOWN AND UP ROUTINES 

BR .-2 
JSAVR6: 0 



G1-N0V-76 21:12 PAGE 129 



: ; BEFORE THE POWER 
;;PUT THE SP HERE 



JOWN WAS CCf1P.E T E 



. SBTTL ERROR TYPE OUT ROUTINE 

• ;#*##♦#**######«######################*#######################♦# 
• ■*♦**####*#####*############*#########################»########♦ 

:*THIS ROUTINE 15 CALLED TO TYPE AN ERROR MESSAGE WHICH IS INCLUDED 
j*IN THE ERROR MESSAGE DATA TABLE. IT IS CALLED BY THE IERROP ROUTINE 
;*0R BY FIRST SETTING SITEMB EQUAL TO THE ERROR TABLE I TEH TO BE PRINTED 
: t0UT AND THEN ECECUTING A: 



001102 
177400 
001116 



001114 
177400 



001116 
036610 
000377 
000004 
000400 

001442 
336260 



301232 
001232 
001234 



j * 

ERTYPE: TYPE 
.WORD 
NOVB 
BIC 
NOV 
NOV 



JSR 



PC, ERTYPE 



IS: 



201: 



036276 



21: 

3S: 
4S: 

51: 



CMP 
BfC 

NOV 
NOV 



DEC 
ASL 

ft 

ADD 

NOV 

9EQ 

TYPE 

.WORD 

TYPE 

.WORD 

NOV 

BEQ 

TYPE 

.WORD 

TYPE 

.WORD 

NOV 
NOV 
NOV 



SCRLF 

aiSTSTNPl.aiSTNPO 

•177400.3ISTNPO 

atSERRPC.SlSTNPl 

RO.-(SP) 



NOVB 3iSITENB.R0 

BIC 1177400, RO 

BNE IS 

NOV 3i5ERRPC.-(SP) 

TYPOC 

JNP 3t£RT5 



IS 7 -" 0 

4(SP).R0 
(RO).RO 
■400, RO 
RO 
RO 

88 

•SERRTB.RO 

(R0)* f 3t2S 
3S 

0 

SCRLF 

(R0)+,3l4S 
5S 

0 

SCRLF 

Rl.-(SP) 
R2,-(SP) 
R3.-^SP) 



;TYPE A CRLF 



;GET PC OF CAL*. 
;SAVE RO 

;GET THE I TEN NUMBER . 



;IF ZERO THEN JU5 T 
:PRIN T THE PC 



; OTHERWISE HAKE RC AN 
: INDEX FOR THE TABLE. 



;PICK UP THE AODRESs 

:0F THE EN, ERROR MESSAGE 



:GET THE DH.DATA HEADER 



:SAVE R1.R2 AND R3 



Kll 



mainoec-ii-dffpb-a pop 

DPPPBfl.Pll C2-N0V-76 21:06 



34 FPP DIAGNOSTIC PART 2 MACY11 27(1006) 
ERROR Tvpc XT ROUTINE 



01-N0V-76 21:12 PAGE ;< 



m 

7722 
7723 
772S 
7725 
7726 
7727 
7728 
7729 
7730 
7731 
7732 
7733 
773M 
7735 
7736 
7737 
7738 
7739 
7740 
77M1 
7742 
77M3 
77MM 
77% 
77M6 
77M7 
77M8 
7749 
7750 
7751 
7752 
7753 
7754 
7755 
7756 
7757 
7758 
7-SS 
77b0 
77b 1 
77B2 
77fc3 
77fe4 

7^65 
7766 
77fe7 
7768 
77b9 
7770 
7771 
7772 
7773 
7 7 7M 



036312 012001 



036314 
036316 



001002 
000137 



036322 011000 



036324 
036326 

036330 
036332 
036334 

036340 
036340 
036344 

0363% 
036350 
036352 
036354 
036356 
036360 
036362 
036364 

036370 
036374 

036376 
036400 
036402 
036404 
036406 
036410 
036412 
036414 
036416 
036420 
036422 
036424 
036426 
036430 
036432 
036434 

036440 
036444 

036446 
036450 
036452 
036453 
036454 



105710 
001004 

013146 
104402 
000137 



122710 
001011 

013102 
0122% 
104402 
104401 
037153 
0112% 
104402 
000137 

122710 
001021 

013102 
012246 
104402 
104401 
037153 
012246 
104402 
104401 
037153 
012246 
104402 
104401 
037153 
011246 
104402 
000137 

122710 
001005 

0131% 
104403 
016 
000 
000137 



236576 



036560 
000002 



036560 
000003 



036560 
000004 



bS: 

ERT1: 



7$: 
8$: 



9S: 



10S: 



03fc560 



NOV 

BNE 
JMP 

MOV 

TSTB 
9NE 

NOV 

TYPOC 

JMP 



criPB 

BNE 

nov 
nov 

TYPOC 

TYPE 

.WORD 

NOV 

TYPOC 

JMP 

CMPB 
BNE 

nov 

NOV 
TYPOC 
TYPE 
.UORO 

nov 

TYPOC 

TYPE 

.UORO 

nov 

TYPOC 

TYPE 

.UORO 

nov 

TYPOC 

jnp 
cnPB 

BNE 

nov 

TYPOS 
.BYTE 
.BYTE 

jnp 



<R0)*.R1 
61 

3IERT4 

(RO),RO 

(RO) 
71 

3(Rl)+,-(SP) 
3IERT2 



•2, (RO) 
9S 

3(R1)*,R2 
(R2H.-CSP) 



SPACE 
(R2),-(SP) 

9tERT2 

•3.(R0) 

ioi 

3(R1)+,R2 
(R2)+,-CSP) 



SPACE 

(R2)+,-(SP) 
SPACE 

(R2)+,-(SP) 



SPACE 
(R2),-(SP) 

3IERT2 

•4.(R0) 
111 

3(Rl)+,-(SP) 

16 
0 

3MERT2 



;GE' T HE ADDRESS OF 'HE 
;DfiTn TABLE. 

; RETURN IF NO DATA. 

;GET ft POINTER TC THE Cft'n 
; FORMAT TABLE. 
; FORMAT ZERO' 



; FORMAT ZERO SO TYPE 
;AN OCTAL NUMBER. 



; FORMAT TUO' 



; FORMAT TUO SO TYPE TUO 
| OCTAL NUMBERS. 



; FORMAT THREE' 



; FORMAT THREE SO TYPE 
;FOUR OCTAL NUMBERS. 



; FORMAT FOUR" 



FORMAR FOUR SO TYPE 
AN OCTfiL NUnBER 
SUPPRESSING LEADING ZEROES. 



MfiINDEC-ll-DF*PB-A POP 11 

OPCPBm.PII Cl-NOV-76 21:0b 



Lll 

34 FPP DIAGNOSTIC PART 2 NACYU 27(1006) 
ERROR TYPE 01 T ROUTINE 



7775 
7776 
7777 
7778 
7779 
7790 
7781 
7782 
7783 
778M 
77 85 
778b 
7787 
7788 
7788 
7790 
7781 
7782 
7783 
7794 
7785 
77% 
7787 
7788 
7788 
7800 
7801 
7802 
7803 
7804 
7805 
780b 
7807 
7808 
7808 
7810 
7811 
7812 
7813 
7814 
7815 
781b 
7817 
7818 
7819 
7820 
7821 
7822 
7823 
7e24 
7825 
782b 
7827 
7828 
7829 
783C 



0364b0 
036464 

sen 

036474 
03b47b 

036502 
C3b50b 

036510 
036514 

03651b 
036520 

036524 
0365X 

036532 
036534 
036540 
036542 
036544 
0365% 
036550 
036552 



03b5b0 
03b5b2 



03b5b4 
036566 
036570 
036572 

03b57b 
036600 
036602 
036604 
036606 
036610 
036612 



122710 
001006 

012137 
104401 
000000 
000137 

122710 
001006 

013137 
104401 
000000 
000137 

122710 
001012 

013102 
012703 
0122% 
10M402 
104401 
037153 
077305 
000137 



036556 000000 



104401 
037151 



005200 
00S711 
001402 
000137 

104401 
001313 
012603 
012602 
012601 
012600 
000207 



000005 

036474 

036564 
000011 

C365lfc 

036564 
000012 

000006 
036560 



036324 



US: 

12S: 
13S: 

14$: 
15S: 

lbS: 



17S: 
ERT2: 

EPT3: 

ERT4: 

ERT5: 



CMPB 
BNE 

10V 
TYPE 
.UORO 
JflP 

CflOB 
BNE 

MOV 
TYPE 
.UORO 
JflP 

CMPB 
BNE 

NOV 

NOV 

NOV 

TYPOC 

TYPE 

.UORO 

SOB 

JMP 

HALT 

TYPE 
.UORO 



INC 
TST 
BEQ 
JMP 

TYPE 

.UORO 

NOV 

NOV 

NOV 

NOV 

RTS 



■5.JR0) 
13* 

(R1)+,9I12S 
0 

3IERT3 

•11. (RO) 
15S 

a.RD*.a«i4s 
o 

3IERT3 

112, (RO) 
ITS 

3(R1H.R2 
•6.R3 

(R2)*,-(SP) 



SPACE 

R3.16S 

3iErj2 
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;FORNAT FIVE' 



JTAB 



RO 
(Rl) 
ERT4 
3t£RTl 



SCRLF 

(SP)+,R3 

(SP)+,R2 

(SP)+,R1 

(SPH.RO 

PC 



; FQRNAT FIVE SO TYPE AN 
;ASCIZ STRING. 



; FORNAT ELEVEN' 



FORMAT ELEVEN SO PICK 
A POINTER TO AN ASCIZ 
STRING. 



; FORMAT TUELVE' 

: FORNAT TUELVE SO TYPE 
;TYPE 5IX OCTAL NUNBERS 



; UNDEFINED FORMAT FOR DATA" 

;PRINT A TAB AFTER TYPING 
; AN DATA TABLE ENTRY 
;0F ALL FORMATS EXCEPT 
;ASCIZ, FORMATS 5 OR 11 

; POINT TC THE NEXT FORMA T 
lENO OF DATA TABLE. 



:DONE. 

.•RESTORE R1.R2 AND R3 



; RESTORE RO. 
; AND RETURN. 



. SBTTL FPP SPURIOUS TRAP TO 244 HANDLER 
|4thIS ROUTINE HANDLES UNEXPECTED TRAPS TO THE FPP TRAP VECTOR AT 



244. 



Ci-NOV-76 21: OS 



Mil 
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7831 
7832 
7e33 



7836 
7637 
7836 
7839 
7840 
78M1 
7842 
7843 
78HM 
7845 
78% 
7847 
7848 
78HS 
7850 
7851 
7852 
78S3 
7854 
7855 
7856 
7857 
7858 
7859 
7860 
7861 
7862 
7863 
7864 
7865 
7866 
7867 
7868 
7869 
7870 
7871 
7872 
7873 
7874 
7875 
7876 
7877 
7878 
7879 
7880 
7881 
7882 
7883 
7884 
78BS 
7BBS 



036622 
036624 
0366: 



036636 
036640 



bj? 001236 

001240 
001242 



170200 
010037 
170300 
010037 
104247 
104412 



036642 000137 0331S0 



036646 011637 

036652 022626 

036654 104250 

036656 104412 



001236 



036660 000137 033150 



036664 011637 

036670 022626 

036672 104251 

036674 104412 



001236 



036676 000137 033150 



FPP SPURIOUS TRAP TO 244 HANDLER 

:*THE LAST FPP INSTRUCTION EXECUTED AND ITS ADDRESS HAS BEEN RECORDED 
;*THESE ALONG WITH THE FEC, FPS AND PC OF TRAP ARE REPORTED. 
: * 



FPSPUR: 



IS: 



NOV 

CNP 

STFPS 

MOV 

STST 

NOV 

ERROR 

RSETL'P 



JNP 



(SP),atSTNP2 

(SP)J-, 'SPH 
RO 

R0,at5TMP3 
RO 

R0,3tSTMP4 
247 



atSEOP 



;SAVE PC 
; RESTORE 
;GET FPS 

;GET FEC 



OF TRAP. 
SP. 



GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G'). 



.SBTTL CPU SPURIOUS TRAP TO 4 HANDLER 

iTHIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 4. 
CPSPUR: NOV (SP),3tSTMP2 ;SAV£ PC OF TRAP. 



IS: 



NOV 
CMP 
ERROR 
RSETUP 



JNP 



(SP),3tSTMP2 

(SP)*,(SP)+ 
250 



aiSECP 



;GC INITIALIZE THE FPS ANO STACK; AND 
;SEE IF THE USER HAS EXPRESSED 
;THE DESIRE TO CHANGE THE SOFTWARE 
; VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G'). 



.SBTTL CPU SPURIOUS TRAP TO 10 HANDLER 
4 THIS ROUTINE REPORTS UNEXPECTED CPU TRAPS TO VECTOR 10. 



CPTWO: 
IS: 



NOV 
CMP 
ERROR 
RSETUP 



JMP 



(SP),atSTMP2 

(SP)*,(SP)+ 
2S1 



aiSEOP 



;SAVE PC Of TRAP. 



GO INITIALIZE THE FPS AND STACK; AND 
SEE IF THE USER HAS EXPRESSED 
THE DESIRE TO CHANGE THE SOFTWARE 
VIRTUAL CONSOLE SWITCH REGISTER (HAS 
THE USER TYPED CONTROL G'). 



.SBTTL SET LOOP ON ERROR AODRESS ROUTINE 

; ;ftftftft#ftftftft«ftft*ftftit*ftftftftft*ftftftftftfti *##*#«###*###*###*****#******** 



TAINDEC-li-DFFPB-A 
D rc P9A.Pll 01-N0^-~fc 21:2fc 



Nil 
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SET LOOP ON ERROR ADDRESS ROUTINE 



7887 
7888 
7889 
7890 
7891 
7892 
7893 
789S 
7895 
78% 
7897 
7898 
7899 
7900 
7901 
79C2 
7903 
7904 
7905 
7906 
7907 
7908 
7909 
7910 
7911 
7912 
7913 
7914 
7915 
791b 
7917 
7918 



038702 01163? 0011 10 
Q3b706 000002 



;« 

. LPER: 



(10V 
RTI 



(SP),3«ILPERR 



036716 
036720 



036722 
036730 
036736 
036744 
0367% 
036752 
036754 
036756 



036760 
036776 
037021 
037033 
037051 
037064 



036710 023727 001140 177570 . RSET: CMP 



. S8TTL FLPG RESET AND CONSOLE TEST ROUTINE 

*THIS ROUTINE UILL BE CALLED AT THE END OF EACH TEST TO 
fRESET THE STACK. CLEAR THE FPS AND SEE IF THE USER HAS TYPED 
* CONTROL G ON THE TERMINAL. IF THE USER HAS TYPED CONTROL G AND 
*THERE IS NO PHYSICAL CONSOLE SWITCH REGISTER THEN THE CONTENTS 
#0F THE SOFTWARE SWITCH REGISTER WILL RE TYPED IN OCTAL ON THE 
•TELETYPE AND THE USER CAN MODIFY IT. 
* 

3«SWR, 1177570 



001001 
104406 



012737 036614 
012737 036646 
012737 036664 
011600 

012706 001100 
005004 
170104 
000110 



051124 050101 

054105 042520 

107 052117 

105 050130 

107 052117 

054105 042520 



000244 
000004 
000010 



042520 
052103 
051040 
041505 
040440 
052103 



BNE IS 

CKSWR 



1$: MOV lFPSPUR,3lFPVECT 

MOV »CPSPUR.3»ERRVECT 

MOV iCPTWO.JllO 

MOV (SP).RO 

MOV tSTACK.SP 

CLR R4 

LDFPS R4 

JMP (RO) 



.NLIST BFX 
; THESE ARE SPECIAL MESSAGES: 



' TRAPPED AT: ' <TAB><TA8> 
'EXPECTED TRAP AT: ' <TAB> 
'GOT R0:'<TA8><TA8> 
' EXPECTED RQ: * <TA8> 
'GOT AC0:'<TA8><TAB> 
'EXPECTED ACO:'<TAB><TAB> 



;SEE IF THERE IS A PHYSICAL 
CONSOLE SWITCH REGISTER. 
; BRANCH IF NO. 

; OTHERWISE TYPE THE CONTENTS 
;0F THE PROGRAM VIRTUAL SWITCH REGISTER 
AND GIVE THE USER A CHANCE TO 
; MODIFY IT. 



;SAVE RETURN ADDRESS . 
; RESET THE STACK POINTER. 
CLEAR THE FPS. 



; RETURN. 



MSA1: 


.ASCIZ 


HSA2: 


.ASCIZ 


HSA3: 


.ASCIZ 


MSA4: 


.ASCIZ 


MSA5: 


.ASCIZ 


MSA6: 


.ASCIZ 



037104 


050200 


053517 


051105 


POWERM: 


.ASCIZ 


037151 


Oil 


000 




JTAB: 


.ASCIZ 


037153 


040 


000040 




SPACE: 


.ASCIZ 


037156 


041501 


047440 


042520 


MSI 




.ASCIZ 


037174 


051506 


041522 


047440 


HS2 




.ASCIZ 


037214 


041501 


020060 


042502 


HS3 




.ASCIZ 


037243 


101 


030 103 


040440 


MS4 




.ASCIZ 


037271 


105 


050130 


041505 


MS5 




.ASCIZ 


037313 


107 


052117 


051040 


MS6 




.ASCIZ 


037331 


106 


040522 


052103 


MS7 




.ASCIZ 


037355 


111 


052116 


043505 


MS10: 


.ASCIZ 


037377 


105 


050130 


041505 


MS11: 


.ASCIZ 


337423 


105 


050130 


041505 


MS12: 


.ASCIZ 



<CRLF>'P0WER FAILURE. PROGRAM RESTARTING. ' <CRLF> 
<TAB> 

'AC OPERAND: '< TAB >< TAB) 
'FSRC OPERAND: '<TAB>< TAB> 
'ACO BEFORE EXECUTION: '< TAB) 
»ACO AFTER EXECUTION: '< TAB > 
'EXPECTED RESULT: '< TAB) 
'GOT RESULT: »<TAB>< TAB) 
•FRACTIONAL RESULT: ' <TAB> 
'INTEGER RESULT: ' <TAB) 
'EXPECTED FRACTION: '<TAB> 
•EXPECTED INTEGER: '< TAB) 



B12 



237500 
C37S20 

C3~S62 
22^77 
C37fe2: 



w . 'w « 

om-sh 

2i2S22 
0SH10S 
040504 



105 
20C 



PDP I! 3" f PF CWSNCS'i: PAR T 2 MAC>11 27(l00fe: 0l-NC\-7fc 21:1= e -^E 

*fe 21:26 F..AG RESE" AND CONSOLE IS* R0U T INE 

C**212l C4210S MS27: . ASCI2 'LOADED DATA: • 

CN2101 042040 MS40: .ASCI 2 'READ DATA: ' 

042520 0S2103 MS415: . ASCI2 'EXPECTED DATA: • 

040524 C 44440 MSHl: . ASCI2 'DATA IN (RO) FSRC: ' 

D40S24 04H44C *1SH2: . ASCI2 'DATA IN 3CC: ' 

020124 042S22 N$43: .ASCI* 'GOT RESULT: ' 

0SC130 04150S NSMH: . ASCI2 'EXPECTED RESULT: ' 

0*2524 252123 CORHES: .ASCI2 < CRLF>' TEST 22, TESTING INTERRUPTS. ^CRLF> 



C3766C 
Z2T71B 
0377% 
"77% 
7772 
040053 



OMC 
040160 
040160 
040204 
040265 
040265 
340311 
CN0372 
0HO372 
040416 
04Q477 
040477 
040523 
040604 
040604 
0408>30 
040713 
040713 
040737 
041022 
041022 
0410% 
041136 
041*36 
0411b2 
041250 
041250 
041274 
041362 
041362 
041406 
041' 
041' 
04l( 
0411 

SIP 

041756 



05o:ots 
ohisci 

050106 
OH 1050 

106 
050 

050106 
041050 

1C6 
050 

050106 
0M1050 

106 
050 

0SG1U6 
041050 

106 
050 

050106 
044504 

050106 
041050 

050106 
041050 

050106 
044504 

050106 
042506 
044504 

050106 



02CI23 
02006C 

020123 
052125 

051520 
052502 

020123 
0S212S 

051520 
052S02 

020123 
05212S 

051S20 
052502 

CL0123 
0S212S 

051520 
052502 

020123 
047104 

020123 
052125 

020123 
05212S 

020123 
047104 

020123 
020103 
042126 
053111 
020123 



040502 
047515 

040502 
04244C 

041040 
020124 

040502 
042440 

041040 
020124 

040502 
042440 

041040 
020124 

040502 
047040 

041040 
020124 

040502 
052047 

040502 
054040 

040502 
054040 

040502 
052047 
020104 
040502 
040502 
024040 
020106 
0405C2 



:TH£SE 
EMI: 
EN2: 
EN3: 



EN4: 

ENS: 

EM6: 

EH7: 

EN1Q: 

ENil: 

EN12: 

EN13: 

ENi4: 

EH1S: 

EN16: 



EN17 
EN20 
EN21 
EN22 
EN23 
EN32 
EN24 



ARE ERROR MESSAGES: 

.ASCI2 'FPS BAD AFTER CflPD CRJ.A." 

. ASCI2 *ACO MODIFIED BY CMPD (ft), A. ' 

.ASCII 'FPS BAD AFTER CNPD.'<CRLF> 

. ASCI2 '(BUT ENBT) STATE 225 UENT TO 475 INSTEAD OF 075.' 

.ASCII 'FPS BAD AFTER CHPD.'<CRLF> 

.ASCI2 ' (BUT ENBT) STATE 225 UENT TO 075 INSTEAD OF 475.' 

.ASCII TPS BAD AFTER CNPD.'<CRLF> 

.ASCI2 '(BUT ENBT) STATE 035 UENT TO 075 INSTEAD OF 475.' 

.ASCII TPS BAD AFTER CNPD.'<CRLF> 

.ASCI2 '(BUT ENBT) STATE 035 UENT TO 475 INSTEAD OF 075.' 

.ASCII TPS BAO AFTER CHPC.^CRLF) 

.ASCI2 ' (BUT ENBT Y8) STATE 777 SHOULD HAVE GONE TO 007.' 

.ASCII TPS BAD AFTER CNPD.'<CRLF> 

. ASCI2 '(BUT ENBT Y8) STATE 777 SHOULD HAVE GONE TO 405.' 

.ASCII TPS BAD AFTER CNPO.'<CRLF> 

.ASCI2 '(BUT NBIT Z8U) STATE 456 SHOULD HAVE GONE TO 010.' 

.ASCII TPS BAD AFTER CHPD.'<CRLF> 

. ASCI2 '(BUT NBIT 2BIT) STATE 456 SHOULD HAVE GONE TO 110." 

.ASCII TPS BAO AFTER CNPD.'<CRLF> 

. ASCI2 /OIDN'T TAKE THE PATH: STATE 456, TO 012. TC 363 TO 120. 

.ASCII TPS BAD AFTER CNP0.'<CRLF> 

.ASCI2 '(BUT XNBT XZBT) STATE 363 UENT TO 140 INSTEAD OF 100.' 

.ASCII TPS BAD AFTER CNPD.'<CRLF> 

.ASCI2 '(BUT XNBT X2BT) STATE 363 UENT TO 100 INSTEAD OF 140.' 

.ASCII TPS BAD AFTER CNPD.'<CRLF> 

. ASCI2 /DIDN'T TAKE THE PATH: STATE 777, TO 407./ 

.ASCI2 'DIVD (R).A TRAPPED TO 244. FSRC=0 AND FID=1.' 

.ASCI2 TPS BAD AFTER DIVD (R),A.' 

. ASCI2 TEC BAD AFTER DIVD (R),A. ' 

. ASCI2 /DIVD (R),A OIDN'T TRAP TO d44. FSRC=0 AND FID=0.- 

. ASCI2 'DIVF (R).A FAILED.' 

. ASCI2 TPS BAD AFTER DIVF (R).«.* 



CIS 



THi*ccc-:i-o cr P9-H pop :i 
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FLAG RESET ANO CONSOLE TEST ROLTINE 



21:12 PAGE US 



1 1 



.1) 



• w < 



.0 

:i) 



.1) 



' 1 . 



(C) 
1j 



'1. 



r 

w < 



C41756 
0S2O00 

042141 

342141 

042:63 

042237 
342237 
042261 
042311 
042311 
042333 

042356 



042433 
DS2456 

042531 

J*263l 
042631 
0426S4 
042704 
042704 
042727 
0427S5 
04303S 
043035 
043060 
043106 
043166 
043166 
043211 
043234 
043234 

0433^7 
043341 
043364 
>4 



0434ft 
043520 
043S20 
04 3543 
043573 
043573 
CXfclb 
043641 
043641 



0445U4 043126 
041050 052125 



104 

05C 
042054 



043126 
020122 

053111 
052502 



024040 
054440 

024040 
043117 

020106 
020124 



EN2S: 
EN26: 



.ASCII 
.ASCIZ 

.ASCII 
-ASCIZ 



.ASCII 
.ASCIZ 

En27rEM2S 
EN30: 



104 


053111 


020106 




.ASCII 


124 


052522 


041516 


EN31: 


.ASCIZ 


104 


053111 


020106 




.ASCII 


122 


052517 


042116 




.ASCIZ 


044504 


042126 


024040 


EM33: 


•ASCIZ 


106 


051520 


041040 


EN34: 
EF13S: 


.ASCIZ 


104 


053111 


020104 




•ASCII 


051124 


047125 


040503 


EH36: 


.ASCIZ 


044504 


042126 


024040 




•ASCII 


1?2 


052517 


042116 




.ASCIZ 


0525x5 


043114 
051520 


024040 


EM37: 


.ASCIZ 


106 


041040 


EM40: 
EM41: 


•ASCIZ 


115 


046125 


020106 




•ASCII 


044523 


047107 


041040 


EH42: 


•ASCIZ 


0525 IS 


043114 


024040 




•ASCII 


116 


051117 


040515 




.ASCII 


050 


052502 


020124 


EH43: 


.ASCIZ 


115 


046125 


020106 




.ASCII 


047516 


0%522 


046101 




.ASCII 


041050 


052125 


054440 


EP44: 


.ASCIZ 


052S1S 


043114 


024040 




.ASCII 


122 


052517 


042116 


EM4S: 


.ASCIZ 


052S1S 


043114 


024040 




.ASCII 


124 




041516 




.ASCIZ 


106 




041040 


EH46: 


.ASCIZ 


US 


046125 


020104 


EH246: 
EM47: 


.ASCIZ 


052S1S 


042114 


024040 




.ASCII 


102 


042101 


041440 




•ASCII 


052600 


042523 


020104 


Efl50: 


•ASCIZ 


052515 


042114 


024040 




.ASCII 
•ASCIZ 


124 


052522 


041516 


EH51: 


11s 


04612S 


020104 




•ASCII 


047522 


047125 


020104 


EH52: 


.ASCIZ 


11s 


04612S 


020104 




.ASCII 



'DIVF (R),A FAILED. ' 

'(BUT Y61. WENT TO STATE 00b INSTEAD 0* 206. 
•DIVF !R),A FAILED 



AIL 

•XOR OF SIGN BITS FAILED STATE 470.* 
•DIVF (R),A FAILED. ' 

' (BUT YblJ WENT TO STATE 20b INSTEAO OF 00b. 



'DIVF (R).A FAILED.* 
•TRUNCATION ERROR. FT=1.' 

•DIVF (R).A FAILED.' 
•ROUND ERROR. FTsO.' 
•DIVD (R).A FAILED.' 
'FPS BAD AFTER DIVD (R),A.' 

'DIVD (R).A FAILED. *<CRLF) 
•TRUNCATION ERROR. FT=1.' 

'DIVD (R).A FAILED. ' <CRLF> 
'ROUND ERROR. FT=Q. * 
•NULF (R).A FAILED. ' 
TPS BAD AFTER NULF (Ri ,A. ' 

'NULF (R),A FAILED. '<CRLF> 
'SIGN BIT BAD STATE 511- ' 

•flULF (R).A FAILED. '<CRLF> 

'normalization failed. * <crlf> 

•(but y62) state 252 went to c44 instead of 444 

'nulf (r).a failed. * <crlf> 

•normalization failed- ' <crlf> 

* (but y62) state 252 went to 444 instead of 044 

'nulf (r).a failed.' <crlf) 
'round error. ft=0.' 

'nulf (r).a failed. ' <crlf> 
' truncation error. ft=1.' 
'fps bad after nuld (ri.a.* 
'nuld (r),a failed.' 

'nuld (r) .a failed. ' <crlf> 

'bad constant used in the mul algorithm. ' 

<crlf>'used 24 insteao of 56 state 020. ' 

'nuld (r).a failed. ' <crlf> 
' truncati6n error. ft=i." 

'nuld (r).a failed. *<crlf> 
•r0un0 error. ft=0.' 

'nuld (r),a failed. "<crlf> 



nj£:-..->-"8-* pop 
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nuocnp 


UCUim 




nuP"»P t 
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i nt 
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U313CU 




nuunnt 


ncn i nt 
louiud 


UcJlCJ 


- 


nuuntu 






• 


nuuntw 


nc?c t c 

LOCP13 


Lnji i~ 




nuu i ff7 
J*tt1U' 


l DC 


ncni tp 


- 


nuu i us 
JflltC 








nuu i u3 
J^" l^c 


DC DC | C 

Local? 


inji i~ 




-~~ 1 03 


t nc 

1LO 


LOU 1 JU 






1 1 c 


Olfc t PC 




-*UU?77 


1 19 


LTT01C3 


n 


wTI J3C 






* 


u~"J5C 


1CPC 1 C 
J3Z313 


nun 1 4 
unji i~ 






dm i nco 


nc?i?c 

LOC1C3 




riuaC t u 






* 


OUUC • u 


ncpcic 

U3C313 


null m 
inJi i~ 




rtuuCT? 


nu i ncn 


nest pc 

LOC1C3 


r 


nuutc? 






• 1 ' 


nuutCP 

U < IU9C 


nc?c i c 

LOC313 


nui 1 1 u 

LTVJl 1~ 




nuu7?7 


ncn 

LOU 


ncpcnp 


0 1 
> J I 


nuCJTfY7 






* 1 ' 


nucrYT7 
unouu' 


1 13 


nuci ?c 
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nuc ! uu 


ncn int. 
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nuup? 
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ncn int. 
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1 13 
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( 1 1 


OHfePPC 


115 


nut i pc 




fKU. YIP 


fNiocn 

U" 1 LOU 


ncPiPC 


'Ci 


Dutgt? 






' T 
* ' 


D4o362 


052515 


0M2114 
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nu i nun 


EMU: 


.ftSCIZ 


nuncnp 
LnLoUc 


EM12: 


.ASCIZ 




Eril3: 




n?unun 




.ASCII 


nu i cnc 




.ASCIZ 




EM14: 




npunun 




.ASCII 


nu i cnc 




.ASCIZ 


nan i nt 


EflliS: 


.ASCIZ 


nan i nt 

UCUIUD 


EM16: 


.ASCIZ 




EH117: 




naunun 




.ASCII 


numun 




.ASCIZ 




EM20: 




npunun 




.ASCII 


numun 




.ASCIZ 




EM21: 




n?unun 




.ASCII 
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.ASCIZ 
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npn i nu 




.ASCII 


nc?ini 

LOC1LU 




.ASCIZ 




EM2^: 




npn. i nu 
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.ASCII 


ncpinp 
Locluo 




.ASCIZ 


npunun 


EM27: 


.ASCIZ 


npunun 


EM130: 


.ASCIZ 




EM31: 




npn i nc 

UCUIUD 




.ASCII 


npn i pu 
ucuic~ 




.ASCIZ 




EM32: 




n?n i nu 
ucuiin 




.ASCII 


ncpirn 

LOC 1UJ 




.ASCII 
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LOC ICS 




.ASCIZ 




EM 33: 




npn I nt 

UCUIUD 




.ASCII 


npn i pu 




.ASCIZ 




EM34: 




npn I nu 

UCUIUD 




.ASCII 


nupnun 




.ASCIZ 




EM3S: 




npunun 
uc ~Lnu 




.ASCII 


nu i cnc 

LTT13U3 




.ASCII 


nc?iPC 

LOC1C3 




.ASCIZ 




EM 36: 




020104 




.ASCII 


043040 




-ASCIZ 


040502 


EM37: 


.ASCIZ 


040502 


EM40: 


.ASCIZ 




E1141=E 


"•111 



D12 

> lACYli 27 aOOfc) 01-NOV-76, 21:12 PfiGE.^t 
CONSOLE TEST ROUTINE 

"BAD CONSTAT USED IN ROUNDING. FT=C. ' 

TPS BAD AFTER NULF (Rj.A. EXPEC t ED CVERF.Oj. " 

•FPS BAD AFTER HULF (R),A. EXPECTED -NOE^F .Cl.. ' 

•NULP (R).A FAILED.* <CRLF/ 
'EXPECTING OVERFLOW, FIV=0. ' 

•HULF (R).A FAILED.' <CRLF> 

'EXPECTING UNDERFLOW. FIU=0.' 

'NULF (R),A TRAPPED TO 244 ON OVERFLOW. FIV--0. ' 

'HULF (R),A TRAPPED TO 244 ON UNDERFLOW. FIU=0. ' 

'NULF (R),A TRAPPED TO 244 ON UNDERFLOW. FIU=0.' 
'(BUT FIU5 STATE 331 WENT TO 155 INSTEAD OF 115. 1 

'HULF (R),A TRAPPED TO 244 ON UNDERFLOW. FIU=0. ' 
'(BUT FIU5 STATE 137 WENT TO 155 INSTEAD OF 115. ' 

'NULF (R),A TRAPPED TO 244 ON OVERFLOW. FIV=0.* 
'(BUT Fivi STATE 333 WENT TO 136 INSTEAD OF lib.' 

'NULF (R),A TRAPPED TO 244 ON OVERFLOW. FIV=0.' 
' (BUT FIV} STATE 133 WENT TO 136 INSTEA0 0* lib." 
'FPS BAD AFTER NULD (R^.A. EXPECTING OVERFLOW. ' 
'FPS BAD AFTER NULD (R).A. EXPECTING UNDERFLOW. ' 

'NULD (R).A FAILED. '<CRLF> 
'EXPECTING OVERFLOW, FIV=0. ' 

'NULD (R).A FAILED. '<CRLF> 

'EXPECTING UNDERFLOW. FIU=0.' 

'NULD (R),A TRAPPED TO ?44 ON OVERFLOW. FIV=0. ' 

•NULD (R),A TRAPPED TO 244 ON UNDERFLOW. FIU=G.' 

'NULF (R),A TRAPPED TO 244 ON UNDERFLOW. FIU=Q.' 
'(BUT FIUJ STATE 331 WENT TO 155 INSTEAD OF 115. ' 

•NULD (R).A FAILED. ' <CRLF> 
'EXPECTING UNDERFLOW. FIU=0.' 

<CRLF)'(BUT FD) STATE 115 WENT TO 424 INSTEAD OF 425. 

•NULF (R),A TIWPPE0 TO 244 ON UNDERFLOW. FIU=0. ' 
' (BUT FIU5 STATE 137 WENT TO 155 INSTEA0 OF 115. * 

'NULD (R),A TRPPPED TO 244 ON OVERFLOW. FIV=0.' 
•(BUT FIV^ STATE 333 WENT TO 136 INSTEAD OF life. * 

'NULD (R).A FAILED. '<CRLF> 
'EXPECTING OVERFLOW. FIV=0.' 

<CRLF>'(BUT FD) STAtE 116 WENT TO 424 INSTEAD OF 425. 

•NULD (R),A TRAPPED TO 244 OH OVERFLOW. FIV=0.' 
'(BUT FIV) STATE 133 WENT TO 136 INSTEAD OF life.' 
'FEC BAD AFTER NULF vR),A. EXPECTING OVERFLOW. FEC=iC 
'FEC BAD AFTER NULF iR).A. EXPECTING UNDERFLOW. PEC=1 
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0H705H 
QM71C7 

0M7166 

DM7333 
DM7333 
DM7M20 
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0M756M 
0M7SMM 
0M7SMM 

DM7730 
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0SM1DS 

osMiil 

US 
DM1050 

0S2S15 
OMlOSO 

052S1S 
OMlOSO 



mi sua 



OSOlfeS 
050165 
050210 
DS02M3 
0S02M3 
050266 
050322 
050322 
0S0MC7 
050%7 
050M67 
0SO512 
0505M5 
050825 
050625 
050712 
050772 
050772 
051056 
051136 
051136 
051161 
051213 

8iii3 

0S13S7 
D51M37 
0S1M71 
OS 1522 
DS1S52 
D515S2 
051603 
051643 



0M51MM 
0M5222 



Ef11M2=Ef1112 



0M6125 


020106 




.ASCII 


0M2S20 


C52103 




.ASCI2 






EH1MM: 


.ASCII 












EH1M5: 


.ASCI2 






EH1M6: 




0M612S 


020106 




.ASCII 


05212b 


0M30MQ 




.ASCI2 






EN1M7: 




0M311M 


02M0M0 


.ASCII 


0S212S 


0M30M0 


EH1S0: 


.ASCIZ 


0M311M 


02MOM0 




.ASCII 


052125 


0M30M0 
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.ASCIZ 
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EH1S3=EN123 



ail5M=EHl2M 
•HISS: 
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DM2520 
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EM 57: 
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.ASCII 


050 


052502 


02012M 


EfllbO: 


.ASCIZ 


US 


0%125 


02010M 




.ASCII 
.ASCII 


05M105 


0M2S20 


0S2103 




200 


OMlOSO 


052125 


EK161: 


.ASCIZ 
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02010M 
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0M30M0 
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.ASCIZ 


05251S 


0M211M 


02M0M0 




.ASCII 


OMlOSO 
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0M30M0 




.ASCIZ 








EH163: 


.ASCII 


052S1S 


0M211M 


02MQM0 




10S 


050130 


0M1S0S 




.ASCII 


200 


0M1050 


052125 


EH16M: 


.ASCIZ 


115 


0M6125 


02010M 




.ASCII 


050 


052502 


02012M 




.ASCIZ 


106 


051520 


0M10M0 


EHS5: 


.ASCIZ 


US 


0M2117 


020106 


EHS3: 


.ASCIZ 


0M7515 


0M310M 


02M0M0 


EHSM: 
EriS6: 


.ASCIZ 


0M7515 


0M310M 


02M0M0 




.ASCII 


101 


030103 


0M20M0 


EMS7: 


.ASCIZ 



•HULF (PJ.A FAILED. '<CRLF> 
'EXPECTING OVERFLOW, FW«1.* 

•HULF (R).A FAILED. * 'CRLF> 
•EXPECTING UNDERFLOW, FIU=1. 



FI-s; 



'HULF (R),A FAILED TO TRAP TO 2MM ON UNDERFLOW. F 

•(BUT Fiul STATE 331 WENT TC 115 INSTEAD OF 1SS.' 

•NULF (R),A FAILED TO TRAP TO 2MM ON UNDERFLOW. FlJsi 

\BUT Fiu5 STATE 137 WENT TO 115 INSTEAD OF 155.' 

•NULF (R),A FAILED TO TRAP TO 2MM ON OVERFLOW. FIV»1. 

'(BUT FIV5 STATE 333 WENT TO 116 INSTEAD OF 136. ' 



"NULF (R),A FAILED TO TRAP TO 2MM ON OVERFLOW. FIV=1. 
' (BUT FIV5 STATE 133 WENT TO 116 INSTEAO OF A36. 
'FEC BAjj AFTER HULQ " 



•FEC 



AFTER NULD 



I Hiii i iu lis liunnu ngs. 

(R).A. EXPECTING OVERFLOW, FEC=10. 
(R),A. EXPECTING UNDERFLOW. FEC=i= 



•NULD (R).A FAILED. '<CRLF> 
•EXPECTING OVERFLOW. FlVsI.' 

•NULD (R).A FAILED. ' <CRLF> 
•EXPECTING UNDERFLOW. FlUsl.' 

'NULD (R),A FAILED TO TRAP TO 2SM ON UNDERFLOW. FId=. 
•(BUT Flu) STATT 331 WENT TO 115 INSTEAD OF 155. • 

'NULD (R).A FAILED. ' <CRLF> 
'EXPECTING UNDERFLOW. FIU=1.' 

<CRLF>'(BUT FD) STATE 155 WENT TO M26 INSTEAD OF M27. 

'NULD (R),A FAILED TO TRAP 10. 2MM ON UNDERFLOW. FIJ=1. 
"""" " ' T0115 " ~~" 



(BUI FIU5 STATE 137 WENT 



INSTEAO OF 1SS. 



'NULD (RJ.A FAILED TO TRAP TO 2MM ON OVERFLOW. FIV=1. 
• (BUT Fiv5 STATE 333 WENT TO 116 INSTEAO OF 136.' 

'HULO (R).A FAILED. '<CRLF> 
•EXPECTING OVERFLOW. FIV=1.' 

<CRLF>'(BUT FD) 5TATE 700 WENT TO M26 INSTEAO OF M27. 

'NULD (R).A FAILED TO TRAP TO 2MM ON OVERFLOW. FIVri. 
' (BUT Fiv5 STATE 133 WENT TO 116 INSTEAD OF 136.' 
'FPS BAO AFTER NOOF (R).A.' 
'NOOF (R),A FRACTION BAO. ' 
•NOOF (R),A INTEGER BAO. ' 

•NODF (R).A FRACTION BAO.'<CRLF> 
•ACO DID NOT GET 0 IN STATE M2M. ' 
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iif 
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047515 
050 

115 
041050 

047515 
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047515 
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106 

053203 
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040502 
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043104 
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043511 

042117 
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042104 
042117 
051520 



C2C106 
042040 



C2Q136 
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020104 
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041050 
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055040 
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024040 
02011b 
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020104 
0410H0 
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Ef166: 
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.ASCII 
. ASCI2 

.ASCII 
. ASCI2 

.ASCII 
.ASCII 
. ASCI2 

.ASCII 
.ASCII 
.ASCI2 

.ASCII 
. ASCI2 

.ASCII 
. ASCI2 

.ASCII 
. ASCI2 

.ASCII 
.ASCI2 



EH70: 
EH71: 
EH72: 
EH73=EM72 
EN74: 
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.PSCI2 
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ASCI 2 
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EN7S: 
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047515 
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024040 
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030103 


043440 
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.ASCII 


101 
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043440 
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. ASCI2 


115 
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-ASCII 
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115 
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.ASCII 


123 


043511 
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EfllOl: 


. ASCI2 


047515 


042104 


024040 




.ASCII 


101 


041040 


042101 




.ASCII 


200 


051117 


024040 
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.ASCI2 


047515 


042104 


024040 




.ASCII 


101 


041040 


042101 




.ASCII 


200 


051117 


024040 




. ASCI2 



•riODF (R).A INTEGER BAD. ' <CRLF> 
•AC1 DID NOT GET 0 IN STATE 142.' 



'MODF (R).A INTEGER BAD. ' <CRLF> 
•AC1 DID NOT GET THE INTEGER IN 



STATE 134. 



•NODF (R).A FRACTION BA0.'<CRLF> 

'A BAD CONSTANT UPS USED (NOT 24) IN STATE 046.' 

<CRLF>'OR (BUT NBIT) STATE 525 UENT TO 050 INSTEAD 0* ISC 

•NODF (R).A FRACTION BAO.'<CRLF> 

•A BAD CONSTANT UPS USED (NOT 24) IN STATE 046." 

<CRLF>'OR (BUT NBIT) STATE 525 UENT TO 150 INSTEAD OF ISC 

'NODF (R).A FRACTION BAO.'<CRLF> 

'(BUT ZBTi STATE 532 WENT TO 102 INSTEAD OF 122." 

•NODF (R).A FRACTION BAO.'<CRLF> 

'(BUT ENflt E2BT) STATE 041 UENT TO 0% INSTEAD OF 2«b.' 



'NODF (R) 
'(BUT FT) 

'NODF (R) 
'SIGN BIT 

'NODF (R) 
'SIGN BIT 
'NODO (R) 
'NOOO (R) 



FPS BAD AFTER NOOD (R)jfl. 



'NODO (R) 
'(BUT FD) 

'NODO (R) 
'ACO GETS 

•NODO (R) 
•AC1 GETS 

'NODO (R) 
'(BUT FD) 

'NOOD (R) 
'SIGN BIT 



A FRACTION BAO.'<CRLF> 

STATE 126 SHOULD HAVE GONE T 0 133. FT=0. 

A FRACTION BAO.'<CRLF> 
BAD. ' 

A INTEGER BAO.'<CRLF) 
BAO IN STATE 733.* 
A FRACTION BAD.' 
A INTEGER BAD. 



A INTEGER BAO.'<CRLF: 

STATE 231 UENT TO 142 INSTEAD OF H3. 

A FRACTION BAD. ' <CRLF> 
0 IN STATE 425 FAILED. ' 

A INTEGER BAO.'<CRLF> 
0 IN STATE 143 FAILEO. ' 

A FRACTION BAD.' <CRLF> 

STATE 526 UENT TO 134 INSTEAD OF 135. 

A INTEGER BAD. ' <CRLF> 
BAD IN STATE 526.' 



EN103: 



•NODD (R).A FRACTION BAO.'<CRLF> 

'A BAD CONSTANT UAS USED (NOT 56) IN a TATE 0% ' 

<CRLF>'OR (BUT NBIT) STATE 523 UENT TO 050 INSTEAD OF 153. 

•NODO (R).A FRACTION BAO.'<CRLF> 

'A BAD CONSTANT UAS USED (NOT 56) IN STATE 046.* 

<CRLF>'OR (BUT NBIT) STATE 525 UENT TO 150 INSTEAD OF 050. 
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056517 
056520 
056520 
056551 
056552 
055552 



047515 
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047515 
042523 
047600 

115 
050 

047515 
041050 

115 
050 

047515 
050 

047515 
000 

047515 
000 

106 
000 

106 
054105 

115 
200 

042S06 
105 

115 
200 

115 
200 

115 
200 

115 
000 

115 
000 

050106 
000 

042506 



042104 
052502 

042104 
020124 
020122 

042117 
052S02 

042104 
052125 

042117 
052502 

042104 
052502 

043104 



043104 



051520 



041505 
042520 

042117 
041501 

020103 
050130 

042117 
C41050 

042117 
041050 

042117 
044523 

042117 



042117 
020123 
020103 



024040 
020124 

C24040 
047111 
041050 

020104 
020124 

024040 
043040 

020104 
020124 

024040 
020124 

024040 

024040 

041040 

041040 
052103 

020106 
020061 

040S02 
041505 

020106 
052125 

020106 
052125 

020106 
047107 

020104 
020104 
040502 
040502 



EN104: 

E1105 
EN1 06 
EN1C7 
EM110 
EN 165 
EN166 
EN167 
EN170 
EH171 
EN172 
EN173 
EH174 
EN175 
EH176 
EN 177 
EH200 
EN201 



.ASCII 
.ASCIZ 

.ASCII 
.ASCII 
.ASCIZ 

.ASCII 
.ASCIZ 

.ASCII 
.ASCIZ 

.ASCII 
.ASCIZ 

.ASCII 
.ASCIZ 

.ASCII 
.BYTE 

.ASCII 
.BYTE 

.ASCII 
.BYTE 

.ASCII 
.ASCIZ 

.ASCII 
•ASCIZ 

.ASCII 
.ASCIZ 

.ASCII 
.ASCIZ 

.ASCII 
.ASCIZ 

.'SCII 
.ASCIZ 

.ASCII 
.BYTE 

.ASCII 
.BYTE 

.ASCII 
.BYTE 



•flODD iR).A FRACTION BAD. ' <CRLF 

' (BUT ZBlt) STATE 532 WENT TO 122 INS^EAO OF 102. 1 

'NODD (R).A INTEGER BAD.'<CRLF> 
"SET INTEGER IN AC1 FAILED.' 

<CRLF>'0R (BUT FD) STATE 733 UENT TO 156 INSTEAC 0? 157. 

•NODD (R),A INTEGER BAD. ' <CRLF> 

•(BUT FD) STATE 122 WENT TO 424 INSTEAD OF 425.' 

'NODD (R),A INTEGER BAD. * <CRLF> 

'(BUT FD) STATE 246 UENT TO 126 INSTEAD OF 127.' 

'NODD (R).A INTEGER BAD. ' <CRLF> 

' (BUT FD) STATE 446 UENT TO 12b INSTEAD OF 127.' 

'NODD (R),A FRACTION BA0.'<CRLF> 

'(BUT FT) STATE 127 UENT TO 313 INSTEAD OF 113- ' 

/HOOF (R).A FRACTION BAD. RESULT OVER OR UNDER FLOU. 



/HOOF (R),A INTEGER BAD. 
0 



RESULT OVER OR UNDER FLCU. 



/FPS BAD AFTER NODF (Ri.A./ 
0 

/FEC BAD AFTER HOOF (R).A./ 
'EXPECTING UNDERFLOW, FEC=l2. t 

/NODF (R),A INTEGER BAD. RESULT OVER OR JNCER F-0-. 
<CRLF>'ACl GETS 0 IN STATE 126 FAILED.' 

/FEC BAD AFTER HOOF (R).A./ 
•EXPECTING OVERFLOW, FEC=10. * 

/HOOF (R).A INTEGER BAO. RESULT OVER OR JNOER FLOW.- 
<CRLF>'(BUT FIV FD) STATE 520 UENT TO 142 INSTEAD Of 162 

/HOOF (R).A INTEGER BAO. RESULT OVER OR UNDER FLOU. 
<CRLF>'(B0T FIV FD) STATE 520 UENT TO 162 INSTEAD OF 142 

/NODF (R).A INTEGER BAO. RESULT OVER OR UNDER FLOU. ■ 
<CRLF>'SIGN BAD IN STATE 517.' 



/NODO (R) ( A FRACTION BAO 
n 



RESULT OVER OR UNDER FLCU. 
HOOD (R).A INTEGER BAD. RESULT OVER OP JNOER FLOW. 



/FPS BAD AFTER NODD (R).A. 
0 



.ASCII 'FEC BAD AFTER NODD <R>.A. 



Hi 



;:n:e:-::-d*«b-« °cf 
rcrD sv;. c :i c:-N:v-"fc 2: 



wO 



34 FPP DIAGNOSTIC *AP T 2 NACY11 27i 1006 J Ol-10V-7fc 2; 
FLAG RESET AM CONSOLE TEST ROUTINE 



- - ' f" 



:st>tC3 

356641 

355541 

056723 
0S7OC3 
3S7003 
OSTCfcS 
357145 
357145 
357176 
257233 
057233 
257315 
357401 
2S7MC1 
357463 



2CC 25*4 105 042520 



115 



200 

:36 

2426C0 

115 
200 

115 
3 or 



042117 
CNiOSO 

042117 
OS 1050 

041505 
05C130 

042117 
CHI 050 

042117 
041050 



020104 
C52125 

Q2C104 
052125 

041040 
041505 

020104 
052125 

020104 
052125 



EH202: 
EN203: 
EN2C4: 
EM20S: 
EH206: 



.ASCI2 <CRLF> 'EXPECTING UNDERFLOW, FEC=12. 



.ASCII NODD (R),A INTEGER BAD. RESULT CVEP OR JNOEF F.C. 

.ASCIZ <CRLF>'tBU T FD) STATE 241 WENT TO l2fe INSTEAD D«" lr~ * 

.ASCII -flODD (R).A INTEGER BAD. RES'JL T OVER OR UNOER F.CU. 

.ASCIZ ■CRLF> , (BUT FD) STATE 047 WENT TO 12b INSTEAD OF 12". ' 

.ASCII 'FEC BAD AFTER MOOD (R).A./ 

.ASCIZ <CRlF> 'EXPECTING OVERFLOW, FEC=10.' 

.ASCII /HOOD (R),A INTEGER BAD. RESULT OVER OR UNDER FlCW./ 

.ASCIZ <CRLF>'iB0T FXV FD) STATE 520 WENT TO ib2 INSTEAD OF 162. 

.ASCII /WOOD (R) > A INTEGER BAD. RESULT OVER OR UNDER FLOW./ 

.ASCIZ <CRLF>*;BUT FIV FDj STATE 520 WENT TO 152 INS'EAO OF 143. 





057547 








EN207: 






CS"W 


101 


042104 


020104 




.ASCIZ 


m 

m> • 


QS7bll 








EH210: 




1 J 


057511 
057725 


124 


042510 


043040 




.ASCIZ 




IQi 
0S360G 


047105 


020124 


EH211: 


.ASCII 
.ASCII 




0S77b3 


111 


051516 


042524 




.ASCIZ 


"i 


060C17 








EM212: 




;i 


050017 


101 


042104 


020104 




.ASCII 


i > 


05X72 


052200 


042510 


043040 




.ASCII 


:> 


050114 


2*4504 


320104 


047516 




.ASCII 


* • 


050143 


105 


047522 


020115 




.ASCIZ 


z> 


G5G203 








EN213: 






050203 


101 


042104 


020104 




.ASCII 


• > 
* 


050255 


052200 


042510 


043040 




-ASCII 




050300 


044504 


020104 


047516 




-ASCII 


i * 


050327 


105 


047522 


020115 




.ASCIZ 


*j ' 


050357 








EN214: 






050357 


101 


042104 


020104 




.ASCII 


1 

* ' 


050442 


052200 


042510 


043040 




.ASCII 




350464 


044504 


020104 


047516 




.ASCII 




050513 


105 


047522 


020115 




-ASCIZ 


z > 


050553 








EM215: 




1 

* ' 


050553 


101 


042104 


020104 




.ASCII 




050525 


052200 


042510 


043040 




.ASCII 


1 

* ' 


050550 


044504 


020104 


047516 




.ASCII 


I 


050677 


105 


047522 


020115 




.ASCIZ 




050727 


124 


042510 


024040 


EM216: 


.ASCII 




051030 


053500 


047105 


020124 




.ASCII 




051055 


111 


051516 


042524 




.ASCIZ 




051121 


101 


042104 


020104 


EN217: 


.ASCIZ 




051163 








EM220: 






051163 


101 


042104 


020104 




.ASCII 




051216 


044124 


020105 


042522 




.ASCII 


i < 


051276 
351357 


024200 


052502 


020124 




.ASCIZ 


4 ' 


111 


051516 


042524 




.ASCIZ 




051413 








EN221: 






051413 


101 


042104 


020104 




.ASCII 



/AODD iR).A PRODUCED A BAD RESULT . / 

'THE FPS WAS BAD AFTER AODD (R),A./ 
'ApOD (R).A FAILED IN THE ROUftfMRUNk FLOWS. ' 
<CRLF> 'WENT FROM STATE 663 TO 313,'<CRLF> 
' INSTEAO OF FROM 663 TO 353. ' 

•AODO (R) ,A FAILED IN THE ROUND ^ TRUNK FLOWS. " 
<CRLF> ' THE FPS WAS BAO.*<CRLF> 
'DID NOT TAKE THE PATH:'<CRLF> 
/FROM STATE 664, TO 505, TO 251V 

'AOOO (R),A FAILED IN THE ROUftfMRUNK «l0WS.' 
<CRLF>'THE FPS WAS BAO.'<CRLF> 
'DID NOT TAKE THE PATH:'<CRLF> 
/FROM STATE 554, TO 505. TO 253.- 

•AOOO (R).A FAILED IN THE ROUND \ TRUNK FLOWS. ' 
< CRLF > ' THE FPS WAS BAO.'<CRLF> 
'OID NOT TAKE THE PATH:'<CRLF> 
/FROM STATE 554, TO 70S, TO 735./ 

'AOOO (R).A FAILED IN THE ROUWMRUNK FLOWS. ' 

<CRLF> 'THE FPS WAS BAO.'<CRLF> 

'OID NOT TAKE THE PATH:'<CRLF> 

/FROM STATE 564. TO 70S, TO 737./ 

'THE (BUT FIU FORK IN THE OVERMJNOER FLOWS FAILED. 

<CRLF> 'WENT FROM STATE 331 TO 11S.'<CRLF> 

' INSTEAO OF FROM 331 T 0 155.' 

'AOOO (R)A TRAPPED TO 244,. FID=1.' 



Flu =1 



/AODD (R).A TRAPPED TO 244. '<CRLF> 
'THE RESULT WAS AN OVERFLOW CONDITION BUT FIV= 0.' 
<CRLF>/(BUT FIV) STATE 133 WENT TO 13b INSTEAD OF lib. 
/INSTEAD OF FROM 133 TO lib./ 

/AODD (R),A FAILED TO TRAP TO 244. <CRLF> 



II 



3F«>8A.P11 Cl-NCV-76 21:06 



34 FPP DIAGNOSTIC PART 2 MACai 27il00fei 0l-NGV-7fe 2 i: .2 PhGE 
FLAG RESET AND CONSOLE TFST ROUTINE 



Ob 1455 
061534 
061567 

8& 

0blbS7 

3i»S 

062054 
062110 
062110 

062165 
062321 
062355 
0623S5 
062410 
062471 
062552 
062606 
062606 
062650 
062730 
062763 
063017 
063053 
063053 
063105 
063161 
063206 
063206 
063240 
063314 
063341 
063341 
063373 
063450 
063475 
063475 
063S27 
063604 



124 
044124 
127 
111 

101 
044124 

047111 

042101 
044124 
044124 
127 
111 

101 
044124 

200 
047111 

042101 
044124 
044124 
127 
111 

101 
200 
102 

042101 
041200 
052502 

101 
200 
052502 

101 
200 
052502 
057611 



042510 
02C105 
047105 
051516 

042104 
020105 
041Q50 
052123 

042104 
020105 
020105 
047105 
05151b 

042104 
020105 
041050 
052123 

042104 
020105 
020105 
047105 
051516 

042104 
042S02 
052125 

042104 
041505 
020124 

042104 
042502 
020124 

042104 
042502 
020124 



051040 
041050 
020124 
042524 

020104 
042522 
052125 
04050S 

024040 
042522 
041050 
020124 
042524 

020104 
042522 
052125 
040505 

024040 
042522 
041050 
020124 
042524 

020104 
040503 
052040 

024040 
052501 
044124 

020104 
040503 
044124 

020104 
040503 
044124 



EM222: 
EM223: 

EM224: 
EM225: 

EM226: 
EN227: 
EM230: 
EN231: 
EM232= 



.ASCII 
.ASCII 
.ASCII 
. ASCI2 

.ASCII 
.ASCII 
. ASCIZ 
.ASCI2 

.ASCII 
.ASCII 
ASCII 
.ASCII 
.ASCIZ 

.ASCII 
.ASCII 
.ASCIZ 
.ASCIZ 

.ASCII 
.ASCII 
.ASCII 
.ASCII 
.ASCIZ 

.ASCII 
.ASCII 
.ASCIZ 

.ASCII 
•ASCII 
.ASCIZ 

•ASCII 
•ASCII 
•ASCIZ 

•ASCII 
.ASCII 
.ASCIZ 
EM210 



,T HE RESULT WAS A OVERFLOW CONDI* ICN ANC 1 
/THE (BUT FIV) FORK FAILED. " CRLF> 
/WENT FROM STATE 133 TO 116,/<CRLF 
/INSTEAD OF FROM 133 TO 136./ 

/AODD (R).fl TRAPPED TO 244./<CRLF> 
' THE RESUllT WAS AN UNDERFLOW CONDITION BUT FIU= 2." 
<CRLF>/(BUT FIU) STATE 331 WENT TO 155 INSTEAD OF 115. 
/INSTEAD OF FROM 331 TO 115./ 



/ADDD (R),A FAILED TO TRAP TO 244,/<CPLF> 

' THE RESULT WAS A UNDERFLOW CONOITION AND FIU=1, 

/THE (BUT FIU) FORK FAILED. /<CRLF> 

/WENT FROM STATE 331 TO 115,/<CRLF> 

/INSTEAD OF FROM 331 TO 155./ 



CR^F 



/ADDD (R).fl TRAPPED TO 244./<CRLF> 
' THE RESULT WAS AN UNDERFLOW CONDITION BUT FIU= 0.' 
<CRLF>/(BUT FIU) STATE 137 WENT TO 155 INSTEAO OF 115.- 
/INSTEAO OF FROM 137 TO 115./ 

/AODD (R),A FAILED TO TRAP TO 244./<CRLF> 

'THE RESULT WAS A UNDERFLOW CONDITION AND FIU=1. ' <CRLF< 

/THE (BUT FIU) FORK FAILED. /<CRLF> 

/WENT FROM STATE 137 TO 115,/<CRLF> 

/INSTEAD OF FROM 137 TO 155./ 

/ADDD (R).A TRAPPED TO 244./ 

<CRLF> 'BECAUSE OF AN EXPECTED OVERFLOW CONDITION, ' <CRLF- 
'BUT THE FEC WAS BAD. ' 

/ADDD (R).A TRAPPED TO 244./ 

<CRLF> 'BECAUSE OF AN EXPECTED OVERFLOW CONDITION. ' <CR^F> 
'BUT THE FPS WAS BAD.' 

/AODD (R).A TRAPPED TO 244.- 

<CRLF>*BE6aUSE OF AN EXPECTED UNDERFLOW CONDITION. * <CRLF 
•BUT THE FEC WAS BAD.' 

/ADDD (R).A TRAPPED TO 244./ 

<CRLF> 'BECAUSE OF AN EXPECTED UNDERFLOW CONDITION, " ORL r 
'BUT THE FPS WAS BAD. ' 





063631 








EM233: 




Uj 


063631 


114 


041504 


042106 




.ASCIZ 


(0; 


063670 








EM234: 




'Ij 


063670 


030122 


041040 


042101 




•ASCII 


>\> 


063722 


040600 


041040 


042101 




.ASCIZ 




063754 








EM235: 





.ASCIZ ^LDCFD (R)+,A RESULT INCORRECT. \ 



•WI10E. 
D"PBA 

11 

1) 

. 1 J 

.55 
i) 



i-il-DTPB-fl POP 11 

PI 1 Oi-NOV-76 21:0b 
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34 FPP DIAGNOSTIC PART 2 MACY11 27(1006) 01-N0V-7b 
FLAG RESET AW) CONSOLE TEST ROUTINE 



21:12 PAGE 1S2 



1! 

.5) 

4 > 



Gb3754 
064022 
064C22 
364C55 

364141 
064141 

BUS 

0b4221 
064231 
064262 
064300 
064300 
064334 
064334 
064360 
064370 
064421 
064437 
064437 

064476 
364521 
064542 
064560 
364614 
064646 

064701 



04152C 
041520 

106 

114 
200 
102 
047111 



0*1040 
041040 

m 

051520 

041504 
044124 
052111 
051440 



042101 
042101 



4C 

041040 

042106 
020105 
053440 
040524 



050106 020123 040502 



044502 
111 



042114 
200 
047111 
047125 
047125 
0M712S 

103 



020124 
020116 



040527 
052123 



114 041504 043104 



043103 
042523 
051440 
054105 

Biff 

051117 



020104 



042S20 
042522 



EH236: 
EM227: 

EM240: 
EM241: 

EM242: 
EM243: 

EN244: 
EN245: 
EH247: 

m\ 

EH2S2: 



.ASCIZ \PC BAD AFTER LDCFD INUM.A. TRAP TC -4. 

.ASCIZ \PC BAD AFTER LDCFD «NUH,A.\ 

•ASCII \RQ BAD AFTER LDCDF <R)*.A.\ 
.ASCI* <CRLF> A BAO CONSTANT WAS USED.' 

.ASCIZ vFPS BAD AFTER LDCFD (Rj*,A.\ 

.ASCII \LOCFO (RH.A FAILED. \ 

.ASCII <CRLF> 'THE FD ' 

.ASCII 'BIT UAS NOT COMPLIMENTED ' 

.ASCIZ 'IN STATE 017.' 

.ASCIZ \FPS BAD AFTER LDCDF (R)*,A.\ 

\LDCDF (R)*.A FAILED. \ 
<CRLF> ' THE FD 



■mw 

.ASCII 
.ASCIZ 

.ASCIZ 

.ASCII 
.ASCII 
.ASCIZ 
.ASCIZ 

m 

.ASCIZ 



'BIT UAS NOT COMPLIMENTED ' 
'IN STATE 017.' 

\LDCOF (RH,A RESULT INCORRECT. \ 

•LDCFD (R),A FAILED.' 
<CRLF>-SET SIGN FAILED ' 
'IN STATE 51e.' 
"UNEXPECTED FPP TRAP TO 244.' 
' UNEXPECTED CPU TRAP TO 4.' 
'UNEXPECTED CPU TRAP TO 10.' 

'CORRECT FLOWS INTERRUPT TE9T MODULE FAILED TO INTEPR-F' 



Hi 

n « 

.0. 



id; 
:i; 
iO; 
a: 

ci: 
o- 



064772 
064772 
065356 
065056 
065143 
065143 
065231 
065231 
065320 
065320 
X5406 
065406 
XS475 
065475 
065565 
065565 
065656 
065656 
065743 
365743 
366030 
366030 



042101 


042104 


040440 


042101 


042104 


024040 


101 


042104 


020104 


101 


042104 


020104 


042101 


042104 


026440 


042101 


042104 


040040 


101 


042104 


020104 


101 


042104 


020104 


044504 


042126 


024040 


115 


04612S 


020104 


047515 


042104 


024040 



EF12S3 
EN254 
EM255 
EM256 
EH257 
EM260 
EH261 
EM262 
EM263 
EM264 
EM265 



.ASCIZ /AOOD ACO.ACO FAILED IN THE INTERRUPT CORRECT FLOWS. ' 

.ASCIZ /AOOD (RO).ACC FAILED IN THE INTERRUPT CORRECT FLOWS. < 

.ASCIZ /AOOO (RO)+.ACO FAILED IN THE INTERRUPT CORRECT FLOWS. 

.ASCIZ /AOOD a(RO)*,ACO FAILED IN THE INTERRUPT CORRECT FLOWS. 

.ASCIZ /AOOD -(RO).ACO FAILED IN THE INTERRUPT CORRECT FLOWS. 

, ASCIZ /AOOO 3-(R0\AC0 FAILED IN THE INTERRUPT CORRECT FLOWS. 

•ASCIZ /AOOO NUM(RO).ACO FAILED IN THE INTERRUPT CORRECT m_OWS. 

, ASCIZ /AOOD 3NUf1(R0),AC0 FAILED IN THE INTERRUPT CORRECT FLOWS. 

, ASCIZ /DIVO (RO),ACO FAILED IN THE INTERRUPT CORRECT FLOWS. 

ASCIZ 'HULD (RO).ACO FAILED IN THE INTERRUPT CORRECT FLOWS. 

•ASCIZ /MODD (RO).ACO FAILED IN THE INTERRUPT CORRECT FLOWS. 



K12 
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066115 



266306 



066247 

066422 
066462 
266511 



266557 
266620 



FLAG RESET AND CONSOLE TEST ROUTINE 
102 351117 0*2522 EN266: .ASCIZ 'CORRECT FLOWS INTERRUPT TEST HCDULE CAUSED UfCPEC'E: 

: T HESE ARE ERROR DATA TABLE hEAOERS: 



32004Q 
107 
020040 
066216 
066216 
366216 
366216 
366216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
040 
066216 
0200MC 
047507 
OHO 
066216 
366216 
066216 
066216 
066216 
Q66216 
066216 
066216 
066216 
066216 
066216: 
066? lb 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
06621b 
066216 
066216 
065216 
066216 
066216 
366216 
066216 
066216 

""W 

047507 
366557 



042524 



052122 



052040 051505 



042524 
020124 
052340 



052122 
042506 
051505 



052040 
020124 



051505 
042506 



ASCIZ 

ASCII 
ASCIZ 
ASCIZ 



DH1: 

DH2: 
0H2=DH1 
DH4=0H1 
DH5=0H1 
DH6=DH1 
DH7=DH1 
DH10=DH1 
DH11=DH1 
DH12=DH1 
DH12=DH1 
DH14=DH1 
DH15=DH1 
DH16=DH1 
DH17 
DH20=DH1 
DH21: 

0H22 
DH22=DH1 
0H32=DH1 
0H24=DH1 
DH25=DH1 
DH26=DH1 
DH27=DH1 
0H3O=DHl 
DH21=DH1 
DH22=DH1 
0H24sDHl 
DH25=DH1 
DH36=DH1 
DH27=DH1 
DH40=DH1 
DH41=DH1 
0H42=DH1 
DH42=DH1 
0H44=DH1 
DH45=DH1 
0H246=0H1 
DH46=0H1 
DH47=DH1 
0H50=DH1 
DH51=DH1 
DH52=DHl 
DH111=DH1 
DHU2=DH1 
DH112=DH1 

BH114=DH1 
H115: .ASCII 
.ASCIZ 
DHUbsOHUS 



ASCII ' TEST '< TAB > "CALL AT PC. '< TAB > 'ERROR AT PC."' T AB' 
, ASCIZ 'GOT FPS.'<TAB> V EXPECTED fPS.* 
.ASCIZ ' TEST. •< TAB >' CALL AT PC .'< TAB >' ERROR AT PC 



' TEST. ' <TAB> 'PC OF CALL. ' <TAB> 'PC OF ERROR. ' < TAB> ' FEC . ' ' TAB' ' FPS . 

' TEST. '< TAB> 'PC OF CALL'<TAB> 'PC OF ERROR. ' <TAB> 
'GOT FEC. ' < TAB > 'EXPECTED FEC. ' 

' TEST. ' < TAB) 'PC OF CALL. ' 'TAB> 'PC OF ERROR. " <TA8> "F P S. " 



' TEST. '< TAB) 'PC OF CALL. ' <TAB> "PC OF ERROR. ' ■• T AB > 
'GOT FEC. "GOT FPS. ' 'EXPECTED FPS.' 



TMinOEC-li-DfFPB 
OfcPBfi.Pil 



POP 



34 FPP CXrtfiNOSTX; 



LIE 

PART 2 IflCY.l 2? (100b) 
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PLfli RESET AND CONSOLE TEST ROUTINE 

r L»nvj r\w jl i m iw wwi wwLk • w w ■ v w ■ a • *w 


366557 


DH117=DH115 

W 1 A A • V l * * W 


Juujj > 


DH120=DH115 

Wl 1 i b W V ' * AW 




DH121=DH115 


D66SS7 


DH122=0H115 


066216 


DH123=DH1 


066216 

UUUi> X W 


DH124=DH1 


UUUC A W 


DH125=DH1 

w ■ * w w v < * 


066 3 i6 


DH126=DH1 

Wl IAWW W' I* 


i3&6557 


DH127=DH115 

Wl 1 A W • W' I A A W 




DH130=DH11S 

Wl * A W^P Wl 1 A A W 


066557 


DH131=DH115 

W' • A W A V • A A W 


JUOL A W 


DH132=DH1 

Wl 1 A WW Wl 1 A 


066557 


DH133=DH1 J 5 


066557 


DH134=DH115 

V' < A W ■ W ' m * W 


nccp i c 

UUOb A W 


DH135=DH1 

Wl ■ A WW Wl ■ A 


066557 


DH136=DH115 

W< * A W^v W 1 ■ * * W 


066537 


DH137=DH115 


066557 


DH140=DH115 


□66557 

WWW W W • 


DH141=DH115 

Wl ■ A • A V» 1 A A W 


066557 


DH142=DH11S 

WIIA • W Wl I A A W 


066557 

WW W W W ' 


DH143=DH115 

Wl ■ A ■ W VI 1 A A W 


066557 

WW WW W • 


DH144=DH115 

VI ■ A ■ ■ mf* • * * W 


066216 

WWWw A W 


DH145=DH1 

Wl 1* ■ W •* 


066216 


DH1%=DH1 


066216 

WWWW A W 


DH147=DH1 


066216 


DH150=DH1 


066557 


DH151=DH115 

VI ■ A W m Wl l * m W 


066557 

WWWW W ' 


DH152=DH115 

W> ■ A WW 1/1 • A A W 


066557 


DH153=DH115 

W a ■ A W%» V ■ • * A W 


066557 


DH154=DH;15 

Wl 1 A w • VI 1 A A w 


066557 


DH155=DH115 

W> ■ A W W Wl 1 A A W 


066557 

WWW WW • 


DH156=DH115 

Wl ■ A WW Wl 1 A A W 


066216 

WWWW A W 


DH157=DH1 

VI 1 A W • V ■ • A 


066557 


DH160=DH115 


066216 


DH161=DH1 

VI ■ A W A V* ■ * 


066216 

WWWW A W 


DH162=0H1 

VI ■ A W^W W< ■ A 


066557 


DH163=DH115 

V* * WW • m * W 


066216 


Dhl64=DHl 

VI • A W ■ fc^' I A 


066216 


DH53=DH1 


066216 


DH54=DH1 


066216 


DH5S=DH1 


066216 


0H56=DH1 

V* *WW V* 1 • 


066216 


DHS7=DH1 


066216 


DH60=DH1 


066216 


DH61=DH1 


066216 


DH62=DH1 


066216 


DH63=DH1 

VI IWW VI ■ * 


066216 


DH64rDhl 


066216 


DH65=DH1 


066216 


DH66=DH1 


066216 


DH67=DH1 


066216 


DH70=DH1 


066216 


DH71=DH1 


066216 


DH72=DH1 


066216 


DH73=DH1 


066216 


DH74=DH1 



Mi 



^INOEC-il-DCPPB-fl PDP 11 34 FPP DIAGNOSTIC PART 2 MAC I'll 27(100&J 01-N0V-7B 

ncxpga.pit Qi-N0V-7fc 21 :Ob FLAG RESET AND CONSOLE TEST ROUTINE 



21:12 PAGE iSS 



0bb£S6 
06671b 
0bb75b 
367006 



067047 
067107 



067122 
067161 
067211 
067250 



06621b 
06621b 
066216 
066216 
066216 
06621b 
06621b 
06621b 
066216 
066216 
066216 
06621b 
0b6557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
066557 
020040 
020040 
043411 
020040 
067006 
066716 
066716 
066716 
066716 
067006 
040 
Oil 
067006 
066656 
067006 
066656 
067006 
020040 
Oil 
040 
043411 
067122 
067211 
067211 



042524 
042524 
052117 
042524 



052123 
052123 
043040 
052123 



052040 
050106 



042524 
047507 
052040 
052117 



051505 
027123 



052123 
020124 
051505 
043040 



DH75=DH1 

DH76=DH1 

DH77=0H1 

DH100=DH1 

DH101=DH1 

DH102sOHl 

0H1Q3=0H1 

DH104=0H1 

DH105=DH1 

0H106=DH1 

0Hl07r0Hl 

DH110=0H1 

Dhl65=0H115 

DH166=0H115 

DH167=DH115 

DH170=0H115 

DH171=DH115 

0H172=DH115 

DH173=DH115 

DH174=DH115 

DH175=0H115 

DH176=0H115 

DH177=0H115 

DH200=0H115 

DH201=DH11S 

DH2Q2=0H115 

DH203=OH115 

DH204=DH115 

DH205=0H115 

DH206=0H115 

DH220: . ASCIZ 

DH207: .ASCII 

.ASCIZ 
DH210: .ASCI? 
DH211=OH210 
DH212=0H207 
0H213=DH207 
DH214=DH207 
DH215=DH207 
DH216=0H210 
DH217: .ASCII 

.ASCIZ 
DH221=DH210 
DH222=DH220 
DH223=DH210 
DH224=0H220 
0H225=0H210 
0H226: .ASCII 

.ASCIZ 
DH227: .ASCII 

.ASCIZ 
DH230=0H226 
DH231=DH227 
0H232=0H227 



' TEST.'<TAB>'PC OF CALL. '< TAB) 'PC OF TRAP. ' 
' TEST. ' <TAB> 'PC OF CALL. '< TAB) 'PC OF ERROR 
< TAB) 'GOT FPS. ' < TAB) 'EXPECTED FPS.' 
' TEST. »< TAB) 'PC OF CALL. ' <TAB> 'PC OF ERROR. 



' TEST. '< TAB) 'PC OF CALL. *< TAB > "PC OF ERROR. 
<TAB) , FPS. , <TAB>'FEC.' 



' TFST. ' <TAB> 'PC OF CALL. '< TAB) 'PC OF TRAP. 
< TAB) 'GOT FEC.'< TAB) 'EXPECTED FEC. ' 
' TEST. '< TAB> 'PC OF CALL. '< TAB) 'PC OF TRAP. 
< TAB) 'GOT FPS. '< TAB > "EXPECTED FPS." 



•KINDEC-ll-CFFPB-A PDP 11 
DFFPBA.P11 01-N0V-76 21:06 



N12 



34 FPP DIAGNOSTIC PART 2 MACY11 27(1006) C1-N0V-76 
FLAG RESET AND CONSOLE TEST ROUTINE 



21:12 PAGE 156 



067300 


020040 


042524 


0S2123 


DH233: 


.ASCIZ 


' TEST.' < TAB) 'PC OF CALL. ' <TAB> 'PC 


OF 


ERROR. ' 


067341 
067401 


040 
Oil 


052040 
047507 


051505 
020124 


0H234: 


.ASCII 
.ASCIZ 


' TEST. ' <THB> 'PC OF CALL. ' <TAB> 'PC 
<TAB> 'GOT R0.'< TAB> 'EXPECTED RO. ' 


OF 


ERROR. ' 


067427 
067453 


040 
120 


052040 
020103 


051505 
043117 


DH235: 


.ASCII 
.ASCII 


' TEST. '<TAB>'PC OF CALL. ' <TAB> 
'PC OF TRAP. '< TAB> 






JO f TO / 

067513 
067537 


nun 

120 
Oil 


UxUiU 

020103 
054105 


043117 
042520 


0H236: 


.ASCII 
.ASCII 
.ASCIZ 


' TCCT '^TflOi'Pr OC Tfll 1 '(TOO 1 , 

'PC OF ERROR. '< TAB) 'GOT PC. ' 
< TAB) 'EXPECTED PC. ' 








067341 






DH237rDH234 








067555 
067601 
067616 


040 
120 
047507 


052040 
020103 
020124 


051505 
043117 
050106 


DH240: 


.ASCII 
.ASCII 
.ASCIZ 


' TEST.'<TAB>'PC OF CALL. '<TAB> 

'PC OF ERROR. '< TAB) 

'GOT FPS.'< TAB) 'EXPECTED FPS.' 







067645 
067712 



067752 



067300 
067555 
067300 
067300 
067300 
040 
020040 
067712 

066306 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
066216 
020040 



052040 
042524 



051505 
052123 



042524 052123 



DH241=DH233 
DH242=OH240 
DH243=0H233 
DH244=DH233 
DH245=DH233 
DH247: .ASCIZ 
DH250: .ASCIZ 
DH251=DH250 

DH252=DH2 
DH253=DH1 
DH254=DH1 
DH255=0H1 
DH256=DH1 
DH257=DH1 
DH260=DH1 
DH261=DH1 
DH262=0H1 
DH263=DH1 
0H264=DH1 
DH265=DH1 
DH266: .ASCIZ 



TEST. '< TAB) 'PC OF CALL. '< TAB) 'PC OF TRAP. ' <~A6> 'FEC. 
TEST. '< TAB) 'PC OF CALL. '< TAB) 'PC OF TRAP. * 



TEST. '< TAB> 'PC OF CALL. '< TAB) 'PC OF TRAP. 



070012 
070030 



004 
004 
070012 
070012 
070012 
070012 
070012 
070012 
070012 
070012 
070012 
070012 
070012 



000 
000 



005 
005 



: THESE 
0F1: 
DF2: 
DF3=DF1 
DF4=DF1 
DF5=DF1 
DF6=DF1 
DF7=DF1 
DF10=DF1 
DFllsDFl 
DF12=DF1 
DF13=DF1 
DF14=DF1 
DF15=DF1 



ARE THE 
.BYTE 
.BYTE 



DATA FORMAT SPECIFIERS FOR THE DATA TABLE: 
4,0,5,0,5,0,5,0,5,5,3,5,5,3 

4:o;s:o;s;s;3:s:5,3' 



*fc i. Zt 



rxs: 



2-2061 



270131 



Q7C155 



3C«« 
DCS 
070051 
273CS1 
DOS 
270061 
2700t>: 

:7oobi 

27006: 
272061 
270061 
070061 

DOM 
272105 
070105 
C7C10S 
070061 
270061 
270061 
070061 
073061 
0^0061 
070061 
Q7ri05 
071105 
070105 
070105 
07010S 
070105 
070061 
070061 
070061 
070061 

004 
070131 
270131 
07C131 
072131 
C70131 
070105 
070105 
07010S 
0701 OS 

OOM 
070155 
070155 
07010S 
070155 
070155 
070105 
070155 
070131 
070131 
070131 
070131 



WWW 



OX 



to WW 



Q0C 



000 



FLAG RESET AND 

DF16=0Fl 
325 DF17: . B N TE 
005 DF20: .BYTE 

DF2l=CF20 

DF22=DF20 
205 DF23: .BYTE 

DF2H=DF23 

0F32rDf23 

DF25=0f23 

DF26=0F23 

DF27s0F23 

Df30sDf23 

DF31=0f23 
005 DF33: .BYTE 

DF34=DF33 

DF3S=Df33 

Df36=0f33 

DF37=0F23 

DF40=0F23 

DfHlrCf23 

DfH2=0F23 

DF43*0F23 

DF44=0F23 

DF45=0f|5 

DF2M6=0F33 

DFH6=0f33 

DF47=0F33 

DFS0=0F33 

®m 

DF111=0F23 
0F112=0F23 
Dfll3=0F23 
DF114=0f23 _ 

005 DF11S: .BYTE 
0fll6=0fll5 
DFI17=0F115 
0fl2O=0F115 
Dfl21=0Flli 
0fl22^FllS 
Dfl23=0F33 
Dfl24=0F33 
DF12S=0F33 
Dfl26s0f33 

005 DFlg: .BYTE 
0F130=0F127 
DF131=0F127 
Dfl32=0F33 
DF133=0F127 

$mw 

DF136sOFl27 
DF137=0F115 
0F140=DF115 
DF141=DF11S 
DF142=DF115 



E13 

nflCYll 27^10061 0l-N0V-7fc =I:lc P«iE .ST 
INSOLE TEST RCU T INE 



u n c n c p r 
4.0.5.0.5.0.5 0 



M. 0.5. 0.5. 0,5,0.5.5.2.5.5.2.5.5.2.5. 5.2 



4.0.5.0,5.0,5.0.5.5,3.5,5.3,5,5.3.5.5,2 



4.0.5.0.5.0,0,0,5,5,2,5,5,2.5.5.2,5,5,2 



4,0,5.0,5,0,0,0,5.5,3.5.5.3,5.5,3.5,5.3 



C13 



: rr: Sh. c :: 



p > 



PDP 



2* fPP DIAGNOSTIC P<V> T 2 MAC Yll ^7(^0^6)^ 01-»<0V-7b 



'0201 



273233 



370265 



370131 
373131 
370061 
070061 
3^0061 
3?o06l 
073 155 
C7C155 
373155 
373155 
373155 
373155 
373 IBS 
37: 155 
370105 
373105 
373155 
373105 

004 
370201 
370201 
373201 
370201 
370201 
070201 
3702Q1 
370201 
070201 
070201 
070201 
370201 

004 
070233 
070233 
370233 
070233 
370233 
370233 
070233 
370233 
070233 
070233 
070233 
070233 
370233 
370233 
070233 
070233 

004 
370265 
070265 
070265 
070265 
070265 
370265 
070265 



333 



300 



000 



FLAG RESET AND CONSOLE 



DF143=DF11S 
0F144=0F115 
DF145sOF23 
DF146=0F23 
Dfl47=DF23 
DF150=0F23 
DF1S1=DF127 
Dfl52=0fl27 
DF153=0F127 
Of 154=Dfl 27 
Dfl55=0fl27 
Dfl56=0fl27 
Dfl57r0f33 
DF160=CF127 
DF161=DF33 
DF162=DF33 
DF163=0F127 
Dfl64=DF33 
305 DFS3: .BYTE 
DFS4=DF53 
0F55sCfS3 
DF56-0F53 
DF57=0fS3 
DF6O=0fS3 
0f61=C" 
0F62=" 
OFT 
DF64= 
0F6S 

0F66s0fS3 
0F67=0f53 
005 DF70: .BYTE 
DF71s0f7g 
Df72rOF70 
DF73=0F70 

0F7M=0F70 

DF75=0F70 

0F76=0F70 

DfT7=0F70 

DF100=Of70 

DF101sOF70 

0fl02=0F70 

DF103=QF70 

0F105=0F70 
0F106x0F70 
DF107=0F70 
DF110=Of70 
DOS 0F165: .BYTE 
DF166=DF16S 
DF167=0F16S 
DF170=0F16S 
DF171r0F165 
DF172=DF165 
DF173=0F165 
DF174=DF16S 



[fC 



21:12 PAGE 158 




4, 0,5. 0.5.0,5,0.5.5,2,5, 5, 2. 5. 5. 2, 5.5,2,5,5,2, 5. 5.2 



4,0,5,0.5,0,5,0.5,5,3,5,5.3,5.5.3,5.5.3,5,5.3.5.5.3 



4,0,5,0,5,0,0,0,5.5,2,5,5.2,5.5.2.5,5.2.5,5.2.5,5.2 



D13 



:"P9h.*:. 



2w CPP DIAGNOSTIC PART 2 NACYil 27(1006) 01-NCV-7& 21:12 PAGE .E : 
FLAG RESET ANO CONSOLE TEST ROUTINE 



070351 

:-:3ti 
:~:43s 



C70444 
070461 

c~oh7c 



070474 



070502 
070506 



070265 
304 
070317 
270317 

0703 r 
0703 r 

070317 
C7C317 
370317 
070317 
004 
004 
070361 
004 
070405 
070405 
070405 
07Q361 
OOM 
070361 
0703b 1 
C70361 
07Q361 
070361 
070361 
070405 
070405 
C70M05 
070M0S 
070405 
004 
004 

004 
070461 
070461 
070461 
070444 
070461 
C70444 
070444 
070444 

004 
070474 
070474 

004 
004 
070506 
070506 
070506 
070506 
070506 
070506 
07050b 
070506 



nnn 



OX 
000 

20C 



000 



000 
000 

300 



000 



000 

coo 



0Fl7S=0f 165 
005 OF 176: .BYTE 
DF177=0fl76 
OF200=OF176 
0F201=0F176 
Df202=Cf 17b 
DF203=0F176 
0f204=0fl76 
0F20S=Cf 17b 
0F206=0F176 
005 0F210: .BYTE 
005 DF207: .BYTE 

DF21i=OF207 
005 0F212: .BYTE 
DF213=0F212 
0F214=DF212 
DF215=0F212 
DF216=0F207 
005 DF217: .BYTE 
DF220=0F207 
DF221=Df207 
DF222=0F207 
0F223=0F2C7 
DF224=OF207 
0F22S=0f207 
0F226=0F212 
0F227=OF212 
DF230=0F212 
DF231=0F212 
DF232=0F212 
005 DF233: .BYTE 
005 Of 234: .BYTE 

005 DF23S: .BYTE 
DF236=0F23M 
DF237=0F234 
DF240=0F234 
0F2M1=0F233 
0F2M2OF234 
0F2M3=0F233 
DF244r0F233 
DF2HS=0F233 

005 DF2M7: .BYTE 
0F250=0F247 
0F2Si=0F247 

005 DF252: .BYTE 
005 DF2S3: JYTE 
l=0F2S3 



DF2S4=0Ft 
DF2S5=0F253 
DF256=0F253 
DF2S7=DF253 
0F26Os0F253 
DF261sDF253 
0F262=0F253 
DF263=DF2S3 



4.0.5.0.5.0,0.0.5.5.3.5.5,3.5.5.3.5.5.2.5,5.3.5.=.: 



4,0.5,0,5,0,5.0 

4.0.5,0,5,5.5.3.5.5,5,3,5.5.5.3,5,5,5,3 
4,0.5.0,5.0,5,0.5.5.5.3,5.5,5,3,5.5.5,3,5.5.5.3 



4,0,5.0,5.0.0 



4,0,5,0,5,5.3.5.5,3,5.5.3 
4,0,5,0,5,0.0 

4,0,5,3 



4,0,5.0.5,0 



4,0,5,0 

4,0.5,0,5.0.5.0.5.5,0,5,5,0,5,5.0.5.5.0.5,5.3,5.5.3 



E13 



■wifCCC-ii-Dfrpe-A °DP .: 

DTFRlA.Pli 3i-NCV-7fe il.Zb 



*i ccc ::mnos*:c 




PAR T 2 n«Cai 27(1006) 01-N0V-76 21; 
FLAG RESET AhO CONSOLE TEST ROUTINE 

§F26S 

or2feb=of, 



12 PniE .sC 




.EVEN 



:7j§b! 



rD624 

:70b^ 

370666 
070710 
072726 
C707&2 




2C123M 237151 
33715b OC12M0 



2 0C123* 037151 



C70SMO 
070540 
370540 
070540 
370SH0 
370540 
3705 HO 
070540 
370540 



U232 
X1232 
001232 
001232 
X1232 
001313 
070725 
070725 
070725 
070725 
070726 
070726 
070725 
370726 
0707,"" 



001234 
001234 
001234 
001234 
X1234 
037271 



037151 
037151 
037151 
037151 
037151 
001244 




:'HESE 
0 T i: 



ARE 



070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
C70726 



t4=8ti 

DT5=0T1 

DT6=DT1 

3T7=DT1 

)T10=0T1 

DT11=DT1 

DT12rDTl 

3T13=DT1 

3T14rDTl 

)TI5=0T1 

jTl^OT! 

0T2O 
DT21 
DT22 
DT23 



. WORD 
.WORD 



WORD 
WORD 
WORD 
WORD 




DT32=0T23 
DT24=0T23 
DT2S=0T23 

mm 

0T3O=0T23 
DT31=0T23 

Te 
iaOTl 
0T3?3JTc 
0T4(W)T23 

n 

0T43=0T23 

DT44=0T23 

0T45=OT23 

DT2%=0T23 

DT46=0T23 

DT47=0T23 

DT50=0T23 

DT51=DT23 

DT52=DT23 

DT111=DT23 

DT112=DT23 



388 



...„ u ...,- t ...~,....w,..~...flP5.lTAfl.IT»f>b 
SCRLF . HS1 . ITHP3. iCRLF *S2. ITF1P4. 0 
i T HPO . r IP 1 , STAB . ITHF2 . ICRLF . KS3 . ITHP3 . ICRLF , "S4 . I* «P4 . : 



ITff>0 , ITHP1 , ITRB . ITHP2 . ITAfl , ITHP4 , ITffS, 
!THP0,!Tff»l,!TAB.!THP2."" 

!p:!J51:|?|l?5[._ T 

Icrl?; n^itSp5?4?RLF! 



. iCILF , "Si . IT0P3 . ICRLF . r«S2 . 



F13 



■*:*©£:-: i-d^ps-h pop 
:"pBh.c:: ci-ncv-76 2i:C6 



3^ FPP DIAGNOSTIC PART 2 iflCYll 2?i lOOfc , Ol-NOV-'fc 
FLAG RESET AND CONSOLE TEST ROUTINE 



d : 



PAGE .t. 



371000 



071054 
07 1274 
071110 
271124 



070726 
370726 
001232 

0^1000 
071000 
07100C 

B?i888 

07072b 
070726 
070726 
070726 
071000 
071000 
071000 
070726 
071000 
371000 
070726 
071000 
371000 
071000 
071000 
371000 
071000 
071000 
070726 
070726 
070726 
070726 
071000 
071000 
071000 
071000 
071000 
071000 
070726 
071000 
070726 
070726 
071000 
070726 
001232 
001313 
001313 
001313 
071054 
071054 
071054 
0710S4 
0710S4 
0710S4 
071 054 
C71054 



001234 



037151 
0*21 244 



00123M 
0371S6 
037377 
037331 



037151 
001240 
001244 
001250 



DT113=0T23 
0T114=0T23 
0 T 115: .UORO 

!uorE 

0T116=0T115 
0T117OT115 
0T120OT115 

BffiHillli 

DT123=0T23 

0T124=0T23 

0T12S=0T23 

0T126OT23 

DT127=0T115 

DT130=0TU5 

DT131=0T115 

DT132=0T23 

0T133=0T115 

DT13S=0T115 

DT135=0T23 

DT136=0T115 

DT137=0T115 

DT140=0T115 

DT141=0TU5 

0T142=0T115 

DT143=0T115 

DT14MsOTll5 

0T145sOT23 

DT146=QT23 

DT1473T23 

DT1HW)T23 

0T15l3)T115 

DT152=0T115 

0TlS3x0TU5 

0T154=0T115 

DTlSS3ni5 

DT156*0T115 

DT157=0T23 

DT160=0T11S 

0T161^T|| 

OTlQ^THS 

0T164s0T23 

0T53: .MORO 
.UORO 
.UORO 
.UORO 

0T54=0T53 

0T55=0T53 

0T56=0T53 

DT57sDT53 

DT60=DT53 

DT61=DT53 

DT62=DT53 

DT63=DT£3 



STflPO . STNP 1 .STAB .STNP2, STAB .IT«P 1 1. 1*1=' . I*h£ . i-c . 

l^:3h:^i:fe:i!H:l^.: 



STNPO, STff>l . STAB JTNP2 JTAB. STflPl 1 , S'AB. S T NP12 
SCRLF, NS1 . StHP3.iCRLF.NS2. STNP4 
SCRLF,NSll.STnPS.SCRLF,.lSl2.STlPb 
SCRLF NS7. ITMP7. 4CRLF , 10 , STflPl 0 . 0 



•kinoe:-:i-d«p9-a pof :: 
:"pbn.ci: ei-NOv-rb 2i:Cb 

371054 

371054 

071054 

071354 

071054 

071354 

071054 

071054 

071054 

071054 

371054 

071054 

071054 

071054 

C71054 

071054 

071054 

071054 

071054 

071054 

071054 
071 iM2 001232 001234 
C7llfe2 001313 03715b 
07117b 001313 037377 
371212 001313 037331 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071142 

071230 001232 001234 
071244 037151 001242 
071252 0C1232 001234 
071272 001313 03754S 
071212 001313 037577 

071252 
371224 001232 001234 
27134M 001313 037520 
271364 001313 0375b2 

071324 

071324 

071324 

071252 
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DTb4=DT53 

0Tb5=DT53 

DTbb=DT53 

DTb7=DT53 

DT70=DT53 

DT7U0T53 

DT72=DT53 

DT73=DT53 

DT74=0T53 

0T7S=DT53 

DT7b=DT53 

DT77=DT53 

DT100=0TS3 

DT101=DTS3 

DT102=0T53 

0T103=OT53 

0T10Mr0T53 

DT105=0T53 

0Tl0b=0T53 

OT107=OT53 

0T110=0T53 
037151 OTlbS: .UORO 
001240 .WORD 
001244 .UORO 
0O12S0 .WORD 

0Tlbb=DTlb5 

DTlb7=0Tlb5 

DTl70=OTlb5 

DTl71=0Tlb5 

0T172=0Tlb5 

0Tl73=0TlbS 

0Tl74=0Tlb5 

0T17Sx0Tlb5 

0T17b=0Tlb5 

0T177r0Tlb5 

DT200=0TlbS 

0T201i0Tlb5 

DT2O2=0Tlb5 

DT2O3=0Tlb5 

DT2OM=0Tlb5 

DT205=0Tlb5 

DT20b=0Tlb5 
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STHPO, STHP1 .1 TAB. ITHP2 JTAB. STHP13. STMP1 1 . S T f*12 
SCRLF . MS 1 . StHP3.tCRLF.ftS2 . STKP4 
SCRLF , f151 1 . STMPS . SCRLF.7JS 12 . STllPb 
SCRLF , WS7 . STHP 7 , SCRLF . felO , *THP10 . 0 



037151 
000000 
037151 
001313 
001313 

037151 
001313 
001313 



DT210: .UORO 
.WORD 
DT207: .UORO 
.UORO 
.UORO 
0T21UDT207 
0T212: .UORO 
.UORO 
.UORO 
DT213=DT212 
DT214sDT212 
DT2i3=DT212 
DT2!b=DT207 



STMPO. STNPLSTAB, STnP2. STAB, STf1P3 
STAB.iTNP4.Cl 

STHPfi, STNPl . STAB, STMP2. SCRLF, NS41 , SCRLF . STMP3 
SCRLF MS42 , SCRlF , STHPM , SCRLF , HS43 , SCRLF , STMPS 
SCRLF , HS44 i SCRLF , STHPb , 0 

STflPO, STflPl. STAB, STMP2, STAB, STMP10. STAB. STNP1 1 
SCRLF , f1S41 . tCRLF STHP3 , SCRLF , HS42 , iCRLF , STHP4 
SCRLF f1S43 , SCRLF . STHP5 , SCRLF . NS44 , SCRLF . STflPb . 0 
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071252 DT221=DT207 
271252 DT222=DT207 
071252 DT223=D T 207 
0712S2 DT224=DT207 
CJ71252 DT225=DT207 
071324 DT22fe=DT2l2 
07132M DT227=DT212 
071324 DT23C=0T212 
371230 DT23UDT210 
071252 CT232=DT207 



071 42b 


001232 


001234 


037151 


M.«J»MMM | I f\ MM 

DT233: .WORD 


071 440 


0374% 


001244 


001313 


.WORD 


071452 


001313 


037520 


00 1250 


.UORD 


mm 1 1 if 

071 4b2 


001232 


001234 


037151 


DT234: .WORD 


A<fl f MM 

071502 


mm ■ mmm 

001232 


001234 


M.MM a #■> ■ 

03/151 


fWMMM 1 |MMM 

0T235: .UORD 




0714b2 






MM AM-* PiT^^U 

DT23b=0T234 




0714b2 






M ^ MMM MM MM*) 

DT237r0T234 




mm • ■ if m 

0714b2 






f\ M M. » M, . M. M M M» . 

DT2H0=0T23M 




07142b 






DT2M1=0T233 




0714b2 






DT2M2=0T23M 




Ut I "CD 






U 1 Ci J— U 1 C JO 




07142b 






DT2M4=0T233 




07142b 






DT245=0T233 


071514 


001232 


001234 


037151 


DT247: .U0R0 


071532 


001232 


001234 


037151 


DT250: .UORD 




071532 






DT251=0T2S0 


071S44 


001232 


001234 


037151 


DT252: .U0R0 


07155b 


001232 


001234 


037151 


DT253: .UORD 


C7157fe 


001313 


03b7b0 


001254 


.UORD 


07lbl2 


001313 


037021 


001244 


.UORD 


07lb2b 


001313 


037051 


001240 


.WORD 




07155b 






DT254=0T2S3 




07155b 






DT255=0T253 




07155b 






DT25b=0T253 




07155b 






DT257=DT253 




07155b 






DT2bO=DT253 




07155b 






DT2bl=DT253 




07155b 






DT2b2=DT253 




07155b 






DT2b3=DT253 




07155b 






DT2b4=DT253 




07155b 






DT2b5=DT253 




071544 






DT2bb=DT252 
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STMP0. STflPl. ST AB,STttP2 .SCRLF 
MS37 . STHPS , SCRLF , 1-542 , ITflPb 
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STHP0 , STflPl , STAB . STHP2 , STAB . STF1P3 . S T NP4 . 2 
STNP0,STMPl,STAB.STf1P2.0 



STHP0 , STMP1 , STAB , STf1P2 . STAB . STMP3. 0 
S;riPO:STnPl,STAB,STHP2,0 

STHPO . STflPl , STAB . STMP2 , 0 

STNPO, STflPl .STAB, STMP2, STAB.STNP7. STAB . STflPl 
SCRLF. fISAl , STflPl 1 . SCRLF, NSA2. STNP12 
SCRLF , NSA3 STMPS, iCRLF , ASA4, STNPb 
SCRLF , MSA5 , STMP3 . SCRLF , USAb . STHP4 . 0 
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AAADON 
AMI 
AAAjJ 



AAA 
AAA1 
AAP1 
AAA2 
AAA3 
AAA4 

nr.nr 



! 8 



AAAS 
ABASE - 

acdw: : 

ACDU2 : 
ACPLCP: 

~ w w ■ 

ACi : 
hCc = 
AC2 = 
AC- : 
ACS : 
ACfc : 
AC? = 
AOOWC = 
AODWl : 
AODU10: 
AODkils 
AO0U12: 

A0DW13: 

AOOWi4- 

ADOU15= 

ACDW2 : 
A0DU3 : 

A0DW4 : 

ADCJS : 

ADDUb = 
A0DW7 z 
ADDW8 = 
AO0H9 = 

ADEvCTs 
AD£V* = 
A£NV : 
AENV" = 
Afft T AL= 
AMADR1: 
AMADR2: 
AMADP3: 
AMALPH: 
AMAHS 1 = 
A1AMS2: 



4422 
3420 

48S 

3456 

3S14 

53 
3646 
3704 
3742 
4000 
- 0OO00C 

: OOOOOC 

: 000000 

: 000000 

:XOOOO00 
:5C000001 

:-<000002 
:-/43O00O3 



:-'.0OO0Ob 
: '/.000007 

: OOOOOC 

■ OCOOOO 

: 000000 

: 000000 

: 000000 

: 000000 

: 000000 
: 000000 

; 000000 

: 000000 
300000 

: 000000 
000000 

: 000000 
000000 
000000 

: 000000 
000000 
000000 

: 000000 

: 000000 

: ooooco 

: 200000 

: ccocoo 

: OOOOOC 
: OOOOOC 

: :ooooo 



AMAMS3= 000000 
AMAMSM= 000000 



AM' 
AMSGTYr 
AMTYP1= 
AMTYP2= 
AMTYP3= 
AMTYP4= 
APASS = 
APR I OR = 
APTCSU= 
APTENV= 
APTSIZ= 
APTSPOs 
ASUREGr 
ATESTNs 
AUNIT = 
AUSUR = 
AVECT1= 
AVECT2= 
B8BO0N 



B8BER3 
3BBCR4 
B8BP1 
BBBP2 
BBBO 
BSS1 
BBB2 
3BB3 
BBB4 
BBBS 
BB86 
BITO r 
BITOO = 
BIT01 = 
BIT02 = 
BIT03 = 
BIT04 = 
BITOS = 
BIT06 = 
BIT07 = 
BIT08 = 
BITOS = 
BIT1 = 
BF10 = 
BITH = 
BIT12 = 
BIT13 = 
BIT14 = 
BIT15 = 



000000 
000000 



000000 

000040 
000001 
0OC2O0 
000100 
OOOOOC 
000000 
000000 
000000 
000000 
000000 
015124 
014700 
014764 
015012 
01504C 
015104 
015114 
014430 
014464 
014512 
014542 
014570 
014626 
014634 
000001 
000001 
000002 
000004 
000010 
000020 
000040 
000100 
000200 
000400 
0010G0 
000002 
002000 
004000 
010000 
020000 
040000 
100000 



BIT2 
BIT3 
T4 
T S 



§1 



BIT8 
BITS 
BPTVEC: 
CCCDON 
CCC1 
CCC10 
CCC11 
CCC12 
CCC13 
CCC2 
CCC3 
CCC4 
CCC5 
CCC6 
CCC7 
CCC8 
CCC9 
CKSUR 
CMP5U8 
CMPTMP 
CNT : 
CORDON 
CORFLG 
CORINT 
CCRMES 
CORSUB 
CORTMP 
CORTRP 
CORTV 
CORTVO 
CORTVi 
C0R1 
COR10 
C0R11 
C0R12 
C0R13 
C0R2 
C0R3 
C0R33 
C0R4 
C0R5 
C0R6 
C0R7 
C0R8 
C0R9 
CPSPUR 
CPTUO 



000004 
000010 
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000400 
001000 

015130 
01S524 
01 5560 
01S614 
01S650 
01S164 
015220 
015254 
015310 
015344 
015400 
015434 
015470 
104406 
014232 
014412 
000267 
033146 
033130 
033142 
037621 
032646 
033132 
033144 
032744 
033106 
033112 
032014 
032436 
032502 
032542 
032602 
032040 
032054 
032066 
032126 
032166 
032226 
032272 

m 

036646 
036bb4 



CR 
CRLF 



ON 



0000 IS 
00020C 

B1ZKB 



S 8 



DO ISP 
DF1 
DF10 
DF100 
DF101 
OF 102 
DF103 
OF 104 
DF10S 
OF 106 
DF107 
Df 11 
OF 110 

Drill 

0F112 

DF113 

DF114 

Of 115 

OFllb 

0F117 

DF12 

0F12O 

m 

DF123 

0F124 

DF125 

0F126 

DF127 

DF13 

DF130 

DF131 

DF132 

DF133 

DF134 

DF135 

OF 136 

Dfi37 

OF 14 

OF 140 

DF141 

DF142 

OF 143 



» 8 



0 

6344 
6420 
474 
550 
177S70 
070012 
070012 
070233 
070233 
070233 
070233 
070233 
070233 
070233 
070233 
070012 

m 

070061 
070061 
070061 
070131 
070131 
070131 
070012 
070131 

mm 

070105 
070105 
070105 
070105 
070155 
070012 
070155 
070155 
070105 
070155 
070155 
070105 
070155 
070131 
070012 
070131 
070131 
070131 
070131 



OF 144 
OF 145 

m 

fefilo 

0 C 151 
DF1S2 

m 

DF1SS 

Cf 156 

DF157 

DF16 

0F160 

DF161 

OF 162 

OF 163 

Dflt4 

OF 165 

OF 166 

DF167 

DFI7 

0F170 

Df 171 

DF172 

DF173 

DF174 

DF175 

DF176 

DF177 

0F2 

DF20 

DF200 

DF201 

0F2O2 

DF203 

DF204 

DF20S 

DF206 

DF207 

DF21 

DF210 

0F211 

DF212 

DF213 

DF214 

DF215 

DF216 

DF217 

DF22 

0F22C 

DF221 



- 17- 1 - 

- W f W Aw* 

= 370061 

: 8?38i! 

- 075 tec 

- fTPtcc 

*. mi 

- 070155 
= 0701SS 
= 070105 
= 070012 
= 070155 
= 070105 
= 070105 
= 070155 
= 070105 

070265 
= 070265 
= 07026S 

070042 
= 070265 
= 070265 
= 070265 
= 073265 

- 070265 
= 070265 

070317 
= 070317 

070030 

070051 
= 070317 
= 070317 
= 070317 
= 070317 
= 070317 
= 070317 
= 070317 

070361 
= 070051 

070351 
= 070361 

070405 
= 070405 
= 070405 
= 070405 
= 070361 

070435 
= 070051 
= 070361 
= T"G36i 
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DF222 
DF223 

m 
m 

DF23 
Df23C 
Of 231 

m - g 

DF236 
DF237 
DF24 
Of 240 
DF241 
DF242 
DF?43 
DF244 
DF245 
DF245 
DF247 
DF2S 
DF2S0 
0F2S1 
DF252 
DF2S3 
DF2SM 
DF2S5 
Of 255 
Of 257 

dfHo 

DF261 
DF262 
DF263 
DF264 
DF265 
DF265 
DF27 
DF3 

DF3C = 0 
DF31 = 0 
DT32 
DF33 
DF34 
DF35 
Df3fc 
Df37 
DF4 
DF40 



C7C3bl 
070361 



Q70361 
0703b 



070081 
070405 
070405 
70405 
704H4 

0704b 1 
070470 
070% 1 
0704bl 
0700b 1 
0704b 1 
070444 
070% 1 
070444 
070444 
070444 
070105 
070474 
070061 
070474 
070474 
070502 
070506 
070506 
070506 
070506 
070506 

970961 
070506 

070506 

070506 

070506 

07050b 

070506 

070502 

070061 

070012 

7QQ61 

70061 

070061 

070105 

070105 

070105 

070105 

070061 

070012 

070061 



DF41 

DF42 

DF43 

DF44 

DF4S 

DF4b 

DF47 

0F5 

DF50 

DFS1 

DFS2 

DFS3 

DF54 

DF5S 

DFSb 

DF57 

Dfb 

DFbO 

DFbl 

DFb2 

DF63 

DFb4 

OFbS 

0F6b 

DFb7 

DF7 

DF70 

DF71 

DF72 

DF73 

DF74 

DF75 

DF7b 

DF77 

DH1 

OHIO 

DH100 

DH101 

DH102 

DH103 

DH104 

DH10S 

DH106 

DH107 

DH11 

DH110 

DH111 

0H112 

DH113 

DH114 

DH115 

DHllb 

DH117 



070061 
070061 
070061 



070061 
070061 
070105 
070105 
070012 
070105 
070105 
070105 
070201 
070201 
070201 
070201 
070201 
070012 
070201 
070201 
070201 
070201 
070201 
070201 
070201 
070201 
070012 
070233 
070233 
070233 
070233 
070233 
070233 
070233 
070233 
0662 lb 
06621b 
0bb21b 
06621b 
06b21b 
06621b 
06621b 
06621b 
06621b 
621b 
621b 
066216 
06621b 
066216 
065215 
0b621b 
06b557 
06b557 
06b557 



DH12 

DH120 

DHlgl 

DH122 

DH123 

DH124 

DH125 

DH12b 

DH127 

DH13 

DH130 

DH131 

0H132 

DH133 

DH134 

DH135 

DH136 

DH137 

DH14 

DH140 

DH141 

DH142 

DH143 

DH144 

DH14S 

DH14b 

DH147 

DH15 

DH150 

0H151 

DH152 

DH153 

DH154 

DH155 

DH156 

DH157 

0H16 

DHlbO 

DHlbl 

DHlb2 

DHlb3 

DHlb4 

DHlb5 



DH17 
DH170 

m 

DH173 
DH174 
DH17S 
DH1 7b 



= 058218 
= 0bb557 
= 066557 
= 055S57 
= 0bb21b 
= 0bb2lb 
= 0bb21b 
= 0bb21b 
= 0bbSS7 
= 0bb21b 
= ObbSS7 
= 056SS7 

- 066216 
= 066557 
= 0bbS57 
= 0b6216 
= 066557 
= 066557 
= 06b216 
= 0bbS57 
= Ob6557 
= 066557 
= 0bbSS7 
= 06b5S7 
= 055215 
= 055215 
= 085218 
= 088218 
= 06821b 
= 06b557 
= 066557 

- 0bb557 
= 06b557 
= 066557 
= 065557 
= 06621b 
= 066216 
= 066557 
= 066216 
= 066215 
= 066557 

:m 

7 
7 

066347 
056557 
7 
7 

066557 
066557 
065557 
0bb557 



DH177 

DH2 

DH20 

DH200 

DH201 

DH202 

DH203 

DH204 

DH205 

DH205 

DH207 

DH21 

DH210 

DH211 

DH212 

DH213 

DH214 

DH215 

DH21b 

DH217 

DH22 

DH220 

DH221 

DH222 

DH223 

DH22H 

DH225 

DH226 

DH227 

Dh23 

DH230 

DH231 

DH232 

DH233 

DH234 

DH235 

DH236 

DH237 

DH24 

DH240 

DH241 

DH242 

DH243 

DH244 

DH245 

DH246 

DH247 



= ObbSS? 

Qbb30b 
= 068216 
= 06&S57 
= 065557 
= Obb557 
= 0bb557 
= 065557 

855557 
55557 
0bb71b 
065422 
Ob700b 
= 06700b 
= 06b71b 
= 06b71b 
= 06b71b 
= 06b71b 
= 067006 
067047 
06b511 
056656 
= 067006 
= 066655 
= 067006 
= 065556 
= 067005 
067122 
067211 
= 06621b 
= 067122 
= 067211 
= 067211 
067300 
067341 
067427 
067457 
= 067341 
= 06521b 
067555 
= 067300 
= 067555 
= 067300 

:K3B 

065215 
067545 



)H2S0 
DH251 
DH252 
DH253 
DH254 



057712 
066305 
065215 
068218 



DH255 

DH255 

DM257 

DH26 

DH250 

DH251 

DH252 

DH253 

DH254 

DH255 

DH255 

DH27 

DH3 

DH30 

DH31 

DH32 

DH33 

DH34 

DH35 

DH36 

DH37 

DH4 

DH4C 

DH41 

DH42 

DH43 

DH44 

DH45 

DH45 

QH47 

DHS 

DHSC 

DHS I 

DH52 

DH53 

DHS4 

DH55 

DriSb 

DH57 

DH5 

DH60 

DH6: 

DH62 

DH63 

DH64 

DH65 

DH65 

0H67 

DH* 

DH7C 

DH71 

DH72 

DH 7 3 



2652. & 
366218 
3662:6 
066*16 
06621b 
06621b 
066215 
06621b 

hb 

067752 
066215 
066215 
066215 
065215 
066215 
066215 
066215 
066215 
066215 
066215 
066215 
066215 
06621b 
066215 
066215 
06521b 
066215 
066215 
06621b 
066215 
066215 
066218 
066215 
066218 
066218 
066218 
066215 
066218 
066215 
056215 
065218 
055218 
055218 
066218 
065218 
066218 

0&5fl5 
065215 
065215 
055215 
0552 18 



•WIWEC-11- 
DPFP9fl.Pl! 



OfFPB-A 

01 -NOV- 



DH7M 
DH75 

i\ 



oivosu 

DIVOT 
DIVFSL 
DIVFT 
DSUR : 

DT10 : 

moo : 

C'lOl : 
D T 10c = 
DT103 s 
DT104 : 
0T1OS 
DTlOb : 
DT107 = 
DT11 
DT110 = 
DT111 = 
DT112 = 
I DT113 = 
DT114 = 
DT11S 
• DTllb = 
' DT117 = 
DT12 = 
I DT120 = 
I DT121 = 
DT122 = 
i DT123 = 
DT12M = 
, DT12S = 
DT126 = 
I DT127 = 
DT13 = 
! DT130 = 
1 DT131 = 
1 DT132 = 
DT133 = 
DT134 = 
DT13S = 
CT136 = 
DT137 = 
DT14 : 
JT14C = 
DT141 = 
DT142 = 
DT142 = 



= Qfr62l 



lit 
Ittiil 
W» 

016630 
017060 
015710 
01612" 
177570 
070S4C 
C70S40 
071054 
0710S4 
071054 
071054 
071054 
071054 
071054 
071054 
070540 
071054 
070726 
070726 
070726 
070726 
071000 
071000 
071000 
070540 
071000 
071000 
071000 
070726 
070726 
070726 
070726 
071000 
070540 
071000 
071000 
070726 
071000 
071000 
070726 
071000 
071000 
070540 
071000 
071000 
071000 
071000 



pop :: 

21:06 

DT144 
07145 

m 

8nio 

DT151 

DTI 52 

DT153 

DT154 

DT155 

DT156 

DT157 

DT16 

DT160 

DT161 

DT162 

DT163 

DTI 64 

DTI 65 

DT166 

DT167 

DT17 

DT170 

DT171 

DT172 

DT173 

DT174 

DT175 

DT176 

DTI 77 

DT2 

DT20 

DT200 

DT201 

DT202 

DT203 

DT204 

DT205 

DT206 

DT207 

DT21 

DT210 

DT211 

DT212 

DT213 

DT214 

DT215 

DT216 

DT217 

DT22 

DT220 

DT221 
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071000 
070726 

Of 

87872 

071000 
071000 
071000 
071000 
071000 
071000 
070726 
070540 
071000 
070726 
070726 
071000 
070726 
071142 
071142 
071142 
070624 
071142 
071142 
071142 
071142 
071142 
071142 
071142 
071142 
070576 
070644 
071142 
071142 
071142 
071142 
071142 
071142 
071142 
071252 
070666 
071230 
071252 
071324 
071324 
071324 
071324 
071252 
071406 
070710 
071252 
071252 



DT222 
DT223 

m 

DT23 

)T230 

)T231 

)T232 

)T233 

)T234 

)T235 

DT236 

3T237 

)T24 

DT2M0 

)T241 

DT242 

DT243 

)T244 

)T§45 

)T246 

5T247 

)T25 

DT250 

JT251 

JT252 

3T2S3 

DT254 

)T255 

5T256 

)T257 

)T26 

5T260 

3T261 

)T262 

)T263 

)T264 

)T265 

)T266 

3T27 

)T3 

)T30 

)T31 

)T32 

DT33 

)T34 

)T35 

)T36 

DT37 

DT4 

DT40 



071252 
071252 

070726 
071324 
071230 
071252 
071426 
071462 
071502 
071462 
071462 
070726 
071462 
071426 
071462 
07142b 
0714 
0714 
070726 
071514 
070726 
071532 
071532 
071544 
071556 
071556 
071556 
071556 
071556 
070726 
071556 
071556 
071556 
071556 
071556 
071556 
071544 
070726 
070540 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070726 
070540 
070726 



DT41 
DT42 

T43 

T44 

T4 1 

T4i 
DT47 
DT5 = 
)T50 = 
)T51 = 
DT52 = 
DT53 
DT54 = 
)T55 = 
)T56 = 
)T57 = 
5Tb = 
)T60 = 
)Tbl = 
DT62 = 
DT63 = 
$Tb4 = 

DT6S = 

3Tbb = 

DTb7 = 

3T7 - 

)T70 = 

DT71 = 

DT72 = 

DT73 = 

)T74 = 

)T75 = 

)T7b = 

)T77 = 
IEEDON 
IEE1 
IEE10 

:eeii 
:eei2 
:eei3 
:ee2 

LEE3 
EEE4 
EEE5 
EEEb 
EEE7 
EEE8 
EEE<3 
EHTVEC= 
EMI 
EM1G 
EM 100 
EM101 



07072b 
07072b 
7C726 
70726 



DT43 = Q 
DT44 = 0 
DT45 = Q7Q726 
jT46 s 07072b 
070726 
070540 
07072b 
07072b 
07072b 
071054 
071054 
071054 
071054 
071054 
070540 
071054 
071054 
071054 

871054 
71054 
071054 
071054 
071054 
070540 
071054 
071054 
071054 
071054 
071054 
071054 
071054 
071054 
020100 
017074 
017470 
017524 
017560 
017514 
017130 
0171b4 
017220 
017254 
017310 
017344 
017400 
017434 
000030 
037bb0 
040477 
053635 
053720 



EMI 32 
EM1C2 

:miom 

EM 105 



emu 

EM110 

:mih 

:mii2 

:mii3 

:mii4 

:mii5 

:mii6 

:mii7 

:mi2 

:hi2o 

:hi2i 

EH122 
:M123 

ISIS 

IM126 

IH127 

EM13 

•M130 

•M131 

EN132 

[M133 

IM134 

IM135 

:M136 

EM137 

EM14 

:hi40 

EM141 

:ni42 

:H143 
[M144 

:ni45 
:ni46 

•Ml 47 

:mi5 

EM150 

EM151 

EM152 

EH153 

EH154 

EM155 

EH156 

EH157 

EM16 

EM160 



054422 
05456? 

040604 
055114 
043731 
044006 
044C64 
044142 
044221 
044277 
044356 
040713 
044514 
044652 
045007 
045144 
045222 
045301 
045357 
045436 
041022 
045514 
045573 
045731 
046067 
046225 
046362 
046517 
046654 
041136 
046742 
043731 
044006 
047031 
047107 
047i66 
047333 
047500 
041250 
047644 
050010 
050076 
045144 
045222 
050165 
050243 
050322 
041362 
05046? 
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Efllbl 


C50fe25 


EM24 


04175b 




0Slb43 


EMlb2 


0S0772 


EM240 


Ob4141 


EMb 


0402b5 


EHlb3 


051136 


EM241 


064175 




051733 


EfllbM 


051273 


EM242 


0b4300 


EMbl 


052035 


EfllbS 


055224 


EH243 


064334 


Eflb2 


052231 


Efllbb 


055310 


EH244 


064437 


EM63 


052425 


EHlb7 


055373 


EH245 


064476 


EMb4 


052 c; 3b 


EH17 


041457 


EH246 


043341 


EMb5 


052b55 


EH 170 


05542S 


EM247 


064560 


EMbb 


052770 


EM171 


055513 


EH25 


042054 


EMb7 


053037 


EH 172 


055836 


EH250 


064614 


EM7 


040372 


EH173 


055723 


EM251 


064646 


EM70 


053122 


EH174 


056071 


EH252 


064701 


EM71 


H53153 


EH17S 


056237 


EH2S3 


064772 


EM72 


u ,c: 3203 


Ef117b 


056351 


E'1254 


065056 


EM73 


0' J203 


EM177 


056435 


EH2S5 


065143 


EH74 


053235 


EH2 


037712 


EH256 


065231 


EM75 


053344 


EM20 


041534 


EH2S7 


065320 


EM7b 


0=3435 


EH200 


056520 


EM26 


042141 


EM7,* 


O c 352b 


EH2T1 


056552 


EH260 


065406 


ERM10 


0J415b 


01202 


056641 


EH261 


065475 


ERRVEC= 


000004 


EH203 


057003 


EM262 


065565 


ERTYPE 


036140 


EH204 


057145 


EH263 


065656 


ERT1 


036324 


EH20S 


057233 


EH264 


065743 


ERT2 


03b5b0 

Www W*#W 


EH206 


057401 


EM265 


066030 


ERT3 


03b5b4 


EH2C7 


057547 


EH266 


066115 


ERT4 


03b57b 


EH21 


041566 


EH27 = 


042054 


ERT5 


03bbl0 


ensio 


057611 


EM3 


037746 


FFFDON 


020b30 


EH211 


057653 


EM30 


042237 


FFFl 


020104 


EH212 


060017 


EH31 


042311 


FFF2 


020160 


EH213 


060203 


EH32 


041724 


FFF3 


050234 


EH214 


060367 


EM33 


042356 


FFF4 


020310 


EM215 


060553 


EM34 


042401 


FPSPUR 


036614 


EH21b 


060737 


EM35 


042433 


FPVECTs 


000244 


EP217 


061121 


EN36 


042506 


GGOflTO 


011554 


EH22 


041620 


EH37 


042554 


GGDONE 


011b74 


EH220 


061163 


EM4 


040053 


GGERO 


010052 


Ef122l 


061413 


EH40 


042577 


GG£R1 


010150 


EH222 


061657 


EM41 


042631 


GGER10 


010662 


EM223 


062110 


EM42 


042704 


GGER11 


010730 


EH224 


062355 


EM43 


043035 


GGER12 


01077b 


EH22S 


062606 


EH44 


043166 


GGER13 


011044 


EH226 


063053 


EH45 


043234 


GGER14 


011112 


EH227 


063206 


EM46 


043307 


GGER15 


011210 


EH23 


041701 


EM47 


043364 


GGER16 


01125b 


EH230 


063341 


EM5 


040160 


GGER17 


011324 


, EH231 


063475 


EMSO 


043520 


GGER18 


011372 


EH232 = 


057611 


EMS1 


043573 


GGER19 


01 1440 


' EH233 


063631 


EM52 


043641 


GGER2 


010216 


EM234 


063670 


EH53 


051471 


GGER20 


011506 


EH235 


063754 


EM54 


051522 


GGER3 


010264 


EH236 


064022 


EMSS 


051437 


GGER4 


010332 


EH237 


064055 


EM56 


051552 


GGER5 


010334 
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GGERb 


310402 


GG7 


0071-H 
007212 


GGER7 


310450 


jjO 


GGER8 


31G54b 


GG9 


007222 


GGER9 


DIQ614 


G"5UR = 


104405 


GGGDON 


325712 


HHOATO 


006606 


GGGl 
GGGIO 


324240 


HHDOHE 


00675b 


325010 


HHE^C 


005b2b 


GGG11 


3250b0 


HHEROO 


005742 


GGG12 


325130 


HHER1 


005b74 


GGGl 3 


D25200 


HHERIO 


00b470 


GGG14 


D25250 


HHER2 


OObOlC 


GGG2 


324310 


HHER3 


OObOSb 


GGG3 


3243b0 


HHER4 


00bl24 


GGG4 


024430 


HHER5 


006172 


GGG5 


324500 


HHERb 


0Ofe2S0 


GGGb 


024550 


HHER7 


006306 


GGG7 


024b20 


HHER8 


0063S4 


GGGB 


02Mb70 


HHERS 


006422 


GGG9 


024740 


HHHDON 


030020 


GGP1 


□11564 


HHH1 


02571b 


GGP2 


011574 


HHH10 


02701b 


GGP3 


Cllb04 


HHH11 


02711b 


GGP4 


011614 


HHH12 


02721b 


GGP5 


011624 


HHH13 


02731b 


GGP6 


011634 


HHH2 


026016 


GGP7 


011644 


HHH3 


026116 


GGP8 


□11654 


innpi 
IUUI ■ 


026216 


ggps 


311664 


IMJUC 


026316 


GG1 


006762 


LMJUt 


026416 


GG10 


XJ7256 


HHH7 


026516 


GG11 


XJ7314 


mho 


026616 


GG12 


007336 


nrfri 


026716 


GG13 


307346 


HHPO 


006616 


GG14 


307364 


HHP1 


006626 


GG15 


007422 


HHP10 


006736 


GG16 


307M40 


HHP11 


006746 


GG17 


307506 


HHP2 




GG18 


00751b 


HHP3 


0066% 


GG19 


:"7552 


HHP4 




GG2 


3O7020 


HHPS 




GG20 


007610 




006676 


GG21 


007632 


HHP7 


006706 


GG22 


007642 


HHPS 


006716 


GG23 


307660 


HHP 3 


006726 


GG24 


007716 


HHTRfiP 


006536 


GG25 


007734 


HH1 


005036 


GG26 


310002 


HH10 


005250 


GG27 


310012 


HH11 


005266 


GG28 


310046 


HH12 


005316 


GG3 


307042 


HH13 


005340 


GG4 


D07052 


HH14 


005360 


GG5 


307070 


HH15 


005370 


GGb 


307126 


HHlb 


00537b 
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MX 1 7 

riA 1 # 


Ulccb4 


MMM3 

nnnc 


n?nn7l. 
UJUUi'D 


UU 1 Q 

mio 


nocucp 

UU3~3C 


MY 1 P 

haiq 


UlcJcc 


nnnj 


non i en 
UJUlbU 


Liu i q 


,"VtCU7U 


MY 1 Q 


DlcJ4c 


MMMU 

nnni 


U JUccc 


HHP 


JUjUDu 


MX? 


Ul 1 /JU 


MMMC 

~nnb 


UJUc' 4 


Lijpn 
mcu 




MYPTI 

nAcu 


n 1 33C3 

UlcJbc 


nnunBt- 


UUUcbo 


MM?1 


nnccpp 

UU33CC 


MY?1 


n i 33CU 


nuuuuu 


n? i 7cu 

UJl '3" 


uup? 


nnccc? 

UU333C 


MX?? 

nACC 


n i OLinu 
Ulc4U4 


nuuuu 1 


nn 7£.u 
UJl fan 


nnc J 


nncc7u 

UU33' • 


MX?? 
nACJ 


Ulc4d4 


PIUUUUV 


n? i ice 
UJl Jbb 


nnc i 


JU3DU~ 


MX?4 
nAC » 




Mnnnci i 
nUUUbu 


H37U33 


LBJPC 


UU30CC 


MX?? 
nAco 


n i 3UCL1 


nUUU 1 U 


mnnnn 
UJUUUU 


HH? 


nn?i in 

UUj 1 1U 


MX?fc 


U 1 c4bc 




ninn i n 

UJUUIU 


1 U li 


nnci ?n 


MX?7 
nAC i 


n i oulu 
UlcHbH 


Mnncnn 
PlUUr UU 


UJUr CO 


UUC 

nnj 


nnci un 

UU3 1 ~u 


MX?R 


Ulcblb 


Mnnrn 1 


nm7it 
UJU/ JD 


nno 


nnciuc 


MX?P 

nACl 


Ulcb4U 


nUUr UV 


nin ic3 
UJUJbc 


UU7 

nn # 


nnc. i mi 


NaT 

nAw 


n i i 7uu 


nUllr bU 


H3C13U 

UcbJc" 


HHP 

nno 


UU3G 1 D 




n i accn 
UlcbbU 


nUUr IU 


Ucbbbc 


HHP 

1 IF 1 J 


nnc?4n 


uyi | 


n 1 3CLL 

Ulcbbb 


nUUr 1 1 


H3CC73 

Ucbb/c 


MT = 




MX?? 
nAoc 


Ulcblb 


Mn.no i 
PlUUrl 


Ucbr Uc 


n AXVrl i w 


013304 


MX?? 
nA JJ 


Ulcb4U 


MCQ 1 


UJbr bu 


wYnnNF 

nAUVllw 


hi mi u 


nAJ" 


n i at rn 
UlcbbO 


MCQ3 


UJbffb 




ni?f»7? 

UlCOr C 


MX?C 

nAJg 


n 1 3c.cc. 
Ulcbbb 


MCQ3 

nbMJ 


ni7n3 i 
Uji Ucl 


HXrRlO 


0131k? 

Ul Ji DC 


uyu 
nA i 


n i i ?lu 
UllrbH 


MCQU 
nbHM 




HXFR1 1 

nALn 1 1 


013P14 


MX? 
nA3 


U12UU4 


nbHb 


UJ/Ubl 


JYC"D 1 p 


ni 3P34 

U1JCJ" 


P1AO 


fl 1 ^fl 1 Li 

012014 


nbHb 


ni?ncu 
UJ'Ub4 


HXFR1 ? 

n/vwn x w 




MX7 


UlcUcc 


MC 1 

nbl 


ni7 i cc 
UJt Ibb 


mxfr? 


UlCr %3C 


myp 


n i anun 
UlcU4U 


mc 1 n 


D171CC 

UJ/ Jbb 




UlCf ID 


MXP 
nAi 


UlcU/c 


MC 1 1 

nbl 1 


017177 


mxfr? 


UlCr DC 


T T TnnN 

1 1 luun 


02147U 


MC 1 3 

nblc 


UJ^TCJ 


HXFR?? 

nAwriww 


n l ?77f> 


TTT 1 
nil 


UcUbJH 


MC3 

nbc 


(117 1 7U 

UJ/ 1/T 




mini? 


TTT? 

1 1 1C 


020700 


nbJ 


D173 1 u 
UJ/C14 


HXFRC; 

nAw™ w 


□ 1 ?7 1 ? 

UlL> 1C 


TTT? 
1 1 1 j 


UcUr 44 


MC?7 


ni7uuc 


HXFRk 


U 1 JU ID 


TTT4 
1 1 1 ■ 


no i n i n 
021010 


MCU 

nb4 


0173U1 

UJ/c4J 






IV 1 vtu- 


UUUUcU 


Mcun 

nb4U 


D17UCU 


"At" f 


fl 1 307k 

W 1 JU r D 


t t Tnnn 


Ucc4jU 


MCU 1 

Plb4l 


ni7C3f1 

UJ^bcU 


HXFRfl 


U 1 JUJU 


JJJI 

J J J i 


Ucl4/4 


MCU t C 

nb"lb 


ni7cnn 

UJf 3UU 


n At ™ j 


LI J 1 CD 


T T Tp 
J J J C 


no i rtn 
UclbbU 


MCUO 

nb4d 


D17CUU 

UJ/b44 


Hyp i 


0 1 33 1 M 

U 1 JJ 1 i 


j j j j 


no t ciiki 
Uclb44 


MCU? 


UJf 30C 


HXP? 

r i/vj w 


0 1 33PM 

U 1 JwC i 


TTT4 


no i *7on 
Ucl/JU 


MCUU 

nb^4 


D17C77 
UJf Of f 


HXP3 


0 1 3334 


kkkOON 


(131373 


MCC 

nbb 


01737 1 

ujf cf i 


HXP4 


0 1 3344 


rvrvrs i 


Ucc4J4 


MCC 

nbb 


ni7ii i 


HXP5 


01 3354 

U 1 JOJ i 


kkk3 
rsrsfs w 


nsscnn 
UccbUU 


MC7 

nbr 


ni7?i i 

\Jj< Jol 


HXPb 


0133b4 


KKK4 

r\r\r\ i 


D33CUU 

Uccb44 


mi ii nci i 


n?n?7n 


HXP7 


Q 13374 

U 1 ww r i 


r\r\r\ j 


nooc t n 
UccblU 


Ml II HT 

nuuu i 


UCUDCU 


HXP8 


Q134D4 

W 1 W i« i 


LF = 


nnnn i 3 
UUUUlc 


Ml II CCI 1 

nuur 3U 


n i 7fccu 


HX1 


011700 


LLLDQN 


Uc4co4 


Mi li CT 

nuur i 


n?nn7n 

UCUUr u 


HX10 


01210b 


LLLl 


noo37t 
UcJc/b 


NNNIVtN 

nnnuun 


0? 1 77U 

UJl f f ' 


HX1 1 

«IA 1 1 


01P1 30 

U 1 C 1 JU 


III? 


n???t? 

UCJJDC 


NNNl 


□3075? 


HX12 


012150 


LLL3 


023MMb 


NNM2 


031054 


HX13 


0121b0 


LLL4 


023532 


NNN3 


03115b 


HXiH 


0121bb 


LOOP 


005034 


Nnn4 


0312b0 


HX15 


012204 


LPERR = 


104413 


0VDNTT 


022420 


HXlb 


012232 


flflMDON 


03074b 


OVDTT 


024224 


HXlbS 


01223b 


nfini 


030024 


0VFNTT 


0214b0 
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OVFTT 


UL JL UL 


5144 = 


0QQ02G 

WWWWWw 




D??D?Q 


5UC, 

3M3 — 


nnnni4n 


nVLINDT 

U V Ul lU 1 


n??k?? 

UL JUL L. 


cup, r 


nnninn 

WWW X wu 


0VUNFN 

\J v wi ii 1 i 


UL a WWW 




nnnpnfi 


0VUNFT 


ULLU WW 


SUB s 


0QC400 

WWW 'WW 


PIRQ = 


Y7777? 

X f * * * L 




UU X UUU 




WUWL • W 


TAB = 

i no 


0000 1 1 

UUUU I X 


P0UERM 


037 ' 04 

Ww ' * U ' 


TBITVF= 

' W X ' * L « 


000014 

UUUU X ' 


PRuGNUs 


0000Q? 


TKVEC = 


WWWWWW 


PRO = 

i nu ~ 


000000 

UUUUUU 


TPVEC = 

1 1 f L. V 


WWWWw ■ 


PRl = 


000040 

WWWW 1 w 


TRAPVE= 


000034 

WWWWW ' 


PR? = 


000100 

UUU X UU 


TRTVEC= 


nnnn 14 

WUWW X ■ 


PR3 = 


000140 

UWWX ' w 


T5T1 

■ w ■ X 


QOS034 

WWWWW ' 


PR4 = 


000200 

WWWW WW 


TEJ1Q 


017072 


PR5 = 


000240 

WW WL IW 


TSTll 


020102 


PRb = 


000300 

wwwwww 


TST12 


020b32 


PR7 = 


000340 

WWWW ' w 


TST13 

1 W 1 X w 


0214 7 2 

WW XI w 


PS = 


17777b 


TST14 

1 W 1 X ' 


022432 

WWW > WW 


PSU = 


17777b 


TST15 


023274 


PWRVEC= 


000024 


TSTlb 


02423b 


RDCHR = 


104407 


TST17 


02571" 


RESREG= 


104411 


TST2 


00b7b0 

WWW ■ Ww 


RESVEC= 


000010 


TST20 

I W ■ WW 


030022 

WWWWWW 


RSETUP= 


104412 


TST21 

1 J 1 L X 


030750 

W WW < WW 


Rb =; 


430000b 


TST22 


03177b 


R7 =X000007 


TST23 

■ J ■ L W 


033150 


SPVREG= 


104410 


TST3 


011b7b 


SPACE 


037153 


TST4 

• w • ■ 


01341b 

W X W * X w 


STACK = 


001100 


TST5 


014424 


START 


00433b 


TSTb 

■ w ■ w 


01512b 

U X W X w w 


STKLMTs 


177774 


TST7 

1 w I • 


01bl3b 

W A W A WW 


SWR 


001140 


TYPE = 

III L 


10440i 

AW ' • w * 


SWREG 


00017b 


TYP0C = 


104402 


SWO = 


000001 


TYPON = 

l l r w 1 1 


104404 

X u ■ ■ w • 


SU00 - 


000001 


TYPOS - 


104403 


SW01 = 


000002 


JAPTHO 


004322 


SU02 = 


000004 


JA1 YC 


03S010 

WWWW A w 


SW03 r 


000010 


JATY1 


0347b4 


SU04 - 


000020 


JATY3 


034772 


SU05 = 


000040 


JATY4 


035002 


SUOb = 


000100 


JAUT0B 


001134 


SU07 = 


000200 


IBASE 


001372 


SW08 = 


000400 


SB0A0R 


001122 


SU0«3 = 


001000 


5B0DAT 

<vWW" 1 


00112b 


SU1 = 


000002 


SBELL 


00130b 


SU10 = 


002000 


SC0U1 


00137b 


sun = 


004000 


SC0U2 


001400 


SU12 = 


010000 


JCHARC 


034532 


SU13 = 


020000 


SCKSUR 


035232 


SU14 = 


040000 


JCLR.T 


033352 


SW15 = 


100000 


ICMTAG 


001100 


5U2 = 


000004 


iCMl = 


000024 


SW3 = 


000010 


$CM2 = 


000050 
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SCO = 


300C2H 


• at *i 

ItRT L 


XI 112 


in5GT> 


on 1 lit 

□□131b 




30CC2H 


tEScAF 
SE T ABL 


X1304 


SnSWR 


03564b 


SCP T LG 


035641 


X1336 


JflTYPl 


AA t ^Ll^ 

001347 


1 1C?TLL 


035634 


IETEN0 


001442 


SHTYP2 


001353 


1 SCPUOP 


0C13HM 


IF A flu 


X1320 


1HTYP3 


001357 


• «*A» ^ 


001313 
X1H02 


IFFLu 


03S230 


ImYPM 


001363 


SDOUC 


IFILLC 


XI. 5b 


fftfvPIJT 

JnXunT 


□33/20 


1 SDOWl 


X140H 


SFlLcS 


aa * \ r r 

XU55 


SNULL 


AA 1 iFU 

XI 154 


t >aam , ■ a 


X1426 
Xlt32 


m> » A AAA 

SGDAOR 


X1120 


>m itat_ 


000X1 


1 tooki: 

I00U12 


IGDOAT 
SGET42 


00 \ \ 2^ 
UJ333H 


lOCNT 

sonoot 


0347b0 
Uj47bc 


I »AA, i • A 

1 IOOW13 


X143S 


a t f*i «A 

SGT5UR 


035302 


. lOVER 


033704 


^ P» A\_i a , | 

SD0W14 
100*15 


X1436 

A*A * 11 1 iH 

X14MC 


SHC = 


000X3 


IPH55 


AO 1 ^fiLi 

001324 


SHIBT5 


004322 


SPRbTn 


004330 


it AA*» if) 

1D0U2 


AA 1 u nf 

X141C 




001104 


IPWRftO 


036114 




ilLLUr 


036132 


SrWKUn 


MC7CU 




AA 1 11 0 

X14i2 


IINTAG 
IITEMB 


AA « « 

X1135 


IrURnG 


036110 


»A^*j ^ 


X1414 


X1114 


• Oi |Arf |A 

JPHRUr 


036026 


•A Aj ir 


^W~a • 1 . ■ / 

X^lb 


SLF 


AA 1 Ai 11 

X1314 


SOUtS 


X1312 




•"W«> t 1 aa 

X*42L 


ILFLG 


335227 


5R0CHR 


036514 


SXUB 


XHc£ 


SLOOP 


A A ^1 1 AA 

Q334X 


SR0SZ = 


000X1 


*AAj ..A. 


A*A 1 LA ALI 

X1424 


SLPmOW 


X1106 


SREGmD 


X1160 


IDEvC 


AA i ^ A**- 

XI 326 


SIP6RR 


001 1 10 


gag Aft 


XI 162 




nn 1 aaxj 

X1374 


S1A0R1 


X135C 


JRtGl 


X1164 


S X)hGN 


a a a *■> a a 


JMwjk2 


AA f V|| 

X1354 


SREG10 


X1202 


Sc*C*C 


j333bg 


SMHOR3 


aa . v r\ 

Qui 3b0 


tor^ 1 1 

IRtGl ; 


OUlcOM 


lENDC* 


033204 




001364 


SREG12 


X1206 


StttJLL 


033436 


SflPIL 


X131b 


SREG13 


roicio 


SfcNV 


X1336 


srwtsi 


aa • -u i r 

X1346 


i«EG14 


X1212 


JEty* 


X1337 


SNHf1S2 


aa 1 "V ^ 

X13S2 


S«tG15 


Xlcl4 


jcur 


UJJ IDC 








UU1C1B 


SEOPC' 


03317b 


ifwnS4 


X1362 


5REG17 


X1220 


ierhax 


00 11 03 
001115 
033722 






H§0 


88Iill 


IERR0R 


srtcu 


035657 


$R£G21 


X122M 


SERRPC 


XI lib 
XI 442 


snsopo 


XI 332 


WEG22 


001226 


KRPTB 


SffSGLG 


XI 334 


SREG23 


X12X 
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ERRORS DETECTED: 0 

DEFAULT GL06ALS GENERATED: 0 



DSKZ : DFFPBA .BIN. DSK2 : DFFPBP . SEO /SOL-DFFPBA . P 1 1 
PiW-TIfC: B5 71 5 SECONDS 
RUN-TINE RATIO: 215/162=1.3 
:^»E JSED: 31K :bl PAGES - 



21-NCV-76 21 :1c PfiGE ."1 



IREG3 


AA t 1 M A 

X117C 


m ua * a 

I 1Pr» 


3-127c 


SREG4 


AA t ( a »^ 

X1172 


l T, 1P21 


X127H 


IREG5 


AA | • At l 

XI 174 




AA t AAr 

X1276 


SREGb 


AA 1 1 "Tf 

X117b 


# T un A A. 

ST1P23 


AA • AAA 

X13X 
X12HC 

AA t Ail A 

X1242 


m+ A^ /* "T 

SREG7 


AA • AAA 

X12X 


ITHP3 


SRE5RE 


A All a«/ 

03421b 




tflTuATi 

JRTNW 


033432 


IT1PS 


AA 4 %. i 

X1244 


IRTRN 


A^^iii Ar 

03J42b 


ITnP6 


AA 1 ^ilf 

X1246 


SSAVRE 


A Ali i e A 

034 lbO 


JTnP7 


AA • A^r* 

Xi25C 


• r Ai #at 

SSAVRb 


aat t 

036136 


ITN s 


AAAAA A 

XX23 


I5C0PE 


A A Al| II A 


ITPB 


X1152 


ISETUPs 


AAA 1 A A 

0X137 


ITPFLG 


AA • « r* a 

X1157 


trti ia 

SSTUP s 


1 A^ A A AA 

177777 


ITPS 


AA l f f" A 

X115C 


» At ft AA 

SSvLRO 


033650 


tTBAfl 

ITRht 


ftAf f A A 

035670 


• A» jAj/» _ 

SSVPC = 


AAll AAA 

00M322 


ITRHP2 


035712 


I5UR - 


17WJ00 


1 iPP = 


000014 


• At flf A 


rv^ t Tun 
XI 34Q 


JTHrHU 


nac?3u 
035724 


S5URtK= 


oooox 


JT5Tn 


nonfat 

004 J26 


• A| MMA_ 


0002X 


f TCTUH 

J'STffl 


00110c 


STAB 


AA7 IP 1 

037151 


JTYPt 


nauacu 
034254 


ITBIT 


AA All Alt 

033434 


JTYPtC 


034Hb6 


ITERn s 


000030 


ITYPEX 




ITESTN 


X1322 


1TYP0C 


03456c 


l T ints 


AA • AAA 

00130c 


ffTVfl^U 

I 1 tFON 


0J457& 


S KB 


AA f • if 

XK46 

AA • • ii Li 

X114H 


tTvonc 
ITYPUS 


DJ4536 


ITK5 


Cl NTT 


UU1 JJu 


ITnPD 


Xlc3c 


Cl ijTTM 

»L51ITn 


004332 


ITnPl 


AA | A All 

X1234 


Cl IClA 

» if-/'* * 
Ivx.C 1 1 


An i ins 


ITff 10 


rtrt 1 A^^ 

X1252 


AA 1 v ^ 

X1366 


JTNP11 


^a t acu 
X1254 


•vyffr T3 
JVtC Te 


nn i •awn 
001 J70 


1 1 nrlc 


UU1C90 


1A lain 


UOJT3" 


ITNP13 


XI 260 


IICETHr 


000X1 


JTW14 




$0FILL_ 


034761 
071644 


ITff 15 






ITNPlb 


X1266 


!lper 


036702 


ITNP17 


X1270 


.RSET 


036710 


5TW2 


X1236 


.IX = 


00M322 



